GNU bug report logs -
#17927
24.3.92; Warnings for init file are not visible after loading the desktop
Previous Next
Reported by: Juri Linkov <juri <at> jurta.org>
Date: Thu, 3 Jul 2014 23:25:01 UTC
Severity: normal
Fixed in version 24.3.92
Done: Juri Linkov <juri <at> jurta.org>
Bug is archived. No further changes may be made.
Full log
View this message in rfc822 format
[Message part 1 (text/plain, inline)]
Your bug report
#17927: 24.3.92; Warnings for init file are not visible after loading the desktop
which was filed against the emacs package, has been closed.
The explanation is attached below, along with your original report.
If you require more details, please reply to 17927 <at> debbugs.gnu.org.
--
17927: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=17927
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
Version: 24.3.92
> When an error occurs while loading the init file, the
> *Warnings* buffer is displayed but hidden immediately
> when the desktop restores the previous window configuration
> by running `desktop-read' from `after-init-hook'.
>
> A possible solution is to postpone displaying the
> *Warnings* buffer to the end of `after-init-hook':
Fixed in the emacs-24 branch since it's a regression.
[Message part 3 (message/rfc822, inline)]
When an error occurs while loading the init file, the
*Warnings* buffer is displayed but hidden immediately
when the desktop restores the previous window configuration
by running `desktop-read' from `after-init-hook'.
A possible solution is to postpone displaying the
*Warnings* buffer to the end of `after-init-hook':
=== modified file 'lisp/startup.el'
--- lisp/startup.el 2014-06-08 23:41:43 +0000
+++ lisp/startup.el 2014-07-03 23:15:54 +0000
@@ -1182,6 +1182,9 @@ (defun command-line ()
(funcall inner)
(setq init-file-had-error nil))
(error
+ (add-hook
+ 'after-init-hook
+ (lambda ()
(display-warning
'initialization
(format "An error occurred while loading `%s':\n\n%s%s%s\n\n\
@@ -1193,7 +1196,8 @@ (defun command-line ()
(if (cdr error) ": " "")
(mapconcat (lambda (s) (prin1-to-string s t))
(cdr error) ", "))
- :warning)
+ :warning))
+ t)
(setq init-file-had-error t))))
(if (and deactivate-mark transient-mark-mode)
This bug report was last modified 10 years and 343 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.