mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 02:31:03 -08:00
Code Issues Projects Releases Wiki Activity

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

Browse source
This commit is contained in:
Richard M. Stallman 1994-03-22 20:41:00 +00:00
parent 46e65b73de
commit 8782c06b52
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/emacs-lisp/debug.el
View file

@ -266,7 +266,11 @@ Applies to the frame whose line point is on in the backtrace."
(beginning-of-line)) (beginning-of-line))
(defun debugger-eval-expression (exp) (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 (save-excursion
(if (null (buffer-name debugger-old-buffer)) (if (null (buffer-name debugger-old-buffer))
;; old buffer deleted ;; old buffer deleted