[Emacs-diffs] master b7730b2: * lisp/startup.el (normal-top-level): Use delay-warning. (Bug#20792)

[Glenn Morris]

branch: master
commit b7730b299b0d421ba9789d992f4c8a7df3fde208
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    * lisp/startup.el (normal-top-level): Use delay-warning.  (Bug#20792)
---
 lisp/startup.el |    6 +-----
 1 files changed, 1 insertions(+), 5 deletions(-)

diff --git a/lisp/startup.el b/lisp/startup.el
index 370e7ae..e614466 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -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)