Commit aff3bff8 authored by Gerd Moellmann's avatar Gerd Moellmann

(command-line): Pop to *Messages* in case an error

is signaled while loading user-init-file.
parent f0753a5f
......@@ -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.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment