procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/emacs-lisp/edebug.el (edebug--display): Save-excursion.

Browse source 
Fixes: debbugs:19611

* lisp/emacs-lisp/debug.el (debugger-env-macro): Remove redundant
save-excursion.
This commit is contained in:
Stefan Monnier 2015-02-25 01:03:14 -05:00
parent b86ba30d17
commit 8bb64d2722
3 changed files with 16 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -535,11 +535,7 @@ Applies to the frame whose line point is on in the backtrace."
(defmacro debugger-env-macro (&rest body)
"Run BODY in original environment."
(declare (indent 0))
`(save-excursion
(if (null (buffer-live-p debugger-old-buffer))
;; old buffer deleted
(setq debugger-old-buffer (current-buffer)))
(set-buffer debugger-old-buffer)
`(progn
(set-match-data debugger-outer-match-data)
(prog1
(progn ,@body)