Mercurial > emacs

changeset 6468:b0c731997544

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(debugger-eval-expression): Use a history list.
author Richard M. Stallman <rms@gnu.org>
date Tue, 22 Mar 1994 20:41:00 +0000
parents 53c14a4f9307
children 4cf30ff89a5e
files lisp/emacs-lisp/debug.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/debug.el	Tue Mar 22 20:18:06 1994 +0000
+++ b/lisp/emacs-lisp/debug.el	Tue Mar 22 20:41:00 1994 +0000
@@ -266,7 +266,11 @@
   (beginning-of-line))
 
 (defun debugger-eval-expression (exp)
-  (interactive "xEval: ")
+  "Eval an expression, in an environment like that outside the debugger."
+  (interactive
+   (list (read-from-minibuffer "Eval: "
+			       nil read-expression-map t
+			       'read-expression-history)))
   (save-excursion
     (if (null (buffer-name debugger-old-buffer))
 	;; old buffer deleted