From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 22 Mar 1994 20:41:00 +0000 (+0000)
Subject: (debugger-eval-expression): Use a history list.
X-Git-Tag: emacs-19.34~9384
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8782c06b52819d0d84cd8f30fc43c4abf9c9ede1;p=emacs.git

(debugger-eval-expression): Use a history list.
---

diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index 1c44bac3405..150686ce4ce 100644
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -266,7 +266,11 @@ Applies to the frame whose line point is on in the backtrace."
   (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