From aff3bff87b8f7c4a6a25378084269f4318ef240c Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Thu, 17 Aug 2000 15:37:07 +0000 Subject: [PATCH] (command-line): Pop to *Messages* in case an error is signaled while loading user-init-file. --- lisp/startup.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/startup.el b/lisp/startup.el index 08082ed31cf..bd2b8a6d22e 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -735,6 +735,7 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." (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. -- 2.39.2