summaryrefslogtreecommitdiff
path: root/lisp/subr.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2010-12-03 18:20:27 -0500
committerStefan Monnier <monnier@iro.umontreal.ca>2010-12-03 18:20:27 -0500
commit7f0ea0ffc90f140cd6e19bc2adb25eb87f3e90d9 (patch)
treec71711e3c40a45e641d3fad31195a3b0c7a94c77 /lisp/subr.el
parentee9355dcc84ecd5ef2a012206498b7ef00d06675 (diff)
downloademacs-7f0ea0ffc90f140cd6e19bc2adb25eb87f3e90d9.tar.gz
* lisp/subr.el (with-demoted-errors): Distinguish symbols from strings.
Diffstat (limited to 'lisp/subr.el')
-rw-r--r--lisp/subr.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/subr.el b/lisp/subr.el
index 70d8b76faa5..ff65997c68c 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -2816,7 +2816,7 @@ but which should be robust in the unexpected case that an error is signaled."
(let ((err (make-symbol "err")))
`(condition-case-no-debug ,err
(progn ,@body)
- (error (message "Error: %s" ,err) nil))))
+ (error (message "Error: %S" ,err) nil))))
(defmacro combine-after-change-calls (&rest body)
"Execute BODY, but don't call the after-change functions till the end.