diff options
author | Glenn Morris <rgm@gnu.org> | 2012-09-09 19:19:23 -0700 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2012-09-09 19:19:23 -0700 |
commit | fa05bfe0525d75bde4c94c3cbbd90c5fa7a5a7dc (patch) | |
tree | 0d2ae275f5d69c3e5663e6b885f83f3e1e65f3b2 /lisp | |
parent | 48e8c8aad6a03b6b20a781b29da8d3e445ab2af7 (diff) | |
download | emacs-fa05bfe0525d75bde4c94c3cbbd90c5fa7a5a7dc.tar.gz |
* mail/emacsbug.el (report-emacs-bug): Trap load-path-shadows errors.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ChangeLog | 4 | ||||
-rw-r--r-- | lisp/mail/emacsbug.el | 11 |
2 files changed, 12 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 34e391a8c57..5d0d00be9dc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-09-10 Glenn Morris <rgm@gnu.org> + + * mail/emacsbug.el (report-emacs-bug): Trap load-path-shadows errors. + 2012-09-08 Alan Mackenzie <acm@muc.de> AWK Mode: make auto-newline work when there's "==" in the pattern. diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el index 1a02ae7c519..742c05bc8d5 100644 --- a/lisp/mail/emacsbug.el +++ b/lisp/mail/emacsbug.el @@ -304,9 +304,14 @@ usually do not have translators for other languages.\n\n"))) (insert "\n")) (insert "\n") (insert "Load-path shadows:\n") - (message "Checking for load-path shadows...") - (let ((shadows (list-load-path-shadows t))) - (message "Checking for load-path shadows...done") + (let* ((msg "Checking for load-path shadows...") + (result "done") + (shadows (progn (message "%s" msg) + (condition-case nil (list-load-path-shadows t) + (error + (setq result "error") + "Error during checking"))))) + (message "%s%s" msg result) (insert (if (zerop (length shadows)) "None found.\n" shadows))) |