summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/startup.el6
1 files changed, 1 insertions, 5 deletions
diff --git a/lisp/startup.el b/lisp/startup.el
index 370e7aee771..e614466aa23 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)