Mercurial > emacs
diff lisp/startup.el @ 30921:4f501e4f7a43
(command-line): Pop to *Messages* in case an error
is signaled while loading user-init-file.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Thu, 17 Aug 2000 15:37:07 +0000 |
parents | 429c384fc024 |
children | dd71356a722a |
line wrap: on
line diff
--- a/lisp/startup.el Thu Aug 17 15:36:54 2000 +0000 +++ b/lisp/startup.el Thu Aug 17 15:37:07 2000 +0000 @@ -735,6 +735,7 @@ (get (car error) 'error-message) (if (cdr error) ": " "") (mapconcat 'prin1-to-string (cdr error) ", ")) + (pop-to-buffer "*Messages*") (setq init-file-had-error t)))) ;; If we can tell that the init file altered debug-on-error, ;; arrange to preserve the value that it set up.