summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/progmodes/elisp-mode.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el
index 7d0312eb2a4..9bf6f9217c8 100644
--- a/lisp/progmodes/elisp-mode.el
+++ b/lisp/progmodes/elisp-mode.el
@@ -1633,7 +1633,10 @@ integer value is also printed as a character of that codepoint.
If `eval-expression-debug-on-error' is non-nil, which is the default,
this command arranges for all errors to enter the debugger."
(interactive "P")
- (values--store-value
+ (funcall
+ ;; Not sure why commit 4428c27c1ae7d stored into `values' only when
+ ;; `eval-expression-debug-on-error' was nil, but let's preserve that.
+ (if eval-expression-debug-on-error #'identity #'values--store-value)
(handler-bind ((error (if eval-expression-debug-on-error
#'eval-expression--debug #'ignore)))
(elisp--eval-last-sexp eval-last-sexp-arg-internal))))