Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-24 22:07:36 +00:00
Code Issues Projects Releases Packages Wiki Activity

* lisp/startup.el (normal-top-level): Use delay-warning. (Bug#20792)

Browse source
This commit is contained in:
Glenn Morris 2015-06-11 21:12:29 -04:00
parent abeb7f3c5f
commit b7730b299b
1 changed files with 1 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/startup.el
View file

@ -612,11 +612,7 @@ It is the default value of the variable `top-level'."
charset-map-path))))
(if default-directory
(setq default-directory (abbreviate-file-name default-directory))
;; FIXME this does not get shown.
;; If after (command-line), it is shown, but if command-line
;; changed the buffer (eg found a file), it applies to that
;; buffer, not *scratch*.
(display-warning 'initialization "Error setting default-directory"))
(delay-warning 'initialization "Error setting default-directory"))
(let ((old-face-font-rescale-alist face-font-rescale-alist))
(unwind-protect
(command-line)