In debug restore current buffer when quitting debugger window (Bug#12502).

* emacs-lisp/debug.el (debug): When quitting the debugger window
restore current buffer (Bug#12502).
This commit is contained in:
Martin Rudalics 2012-10-03 09:18:50 +02:00
parent a3c5c0c580
commit 2e566ecb82
2 changed files with 8 additions and 1 deletions

View file

@ -273,7 +273,9 @@ first will be printed into the backtrace buffer."
(setq debugger-previous-window-height
(window-total-size debugger-window))
;; Unshow debugger-buffer.
(quit-restore-window debugger-window debugger-bury-or-kill))
(quit-restore-window debugger-window debugger-bury-or-kill)
;; Restore current buffer (Bug#12502).
(set-buffer debugger-old-buffer))
;; Restore previous state of debugger-buffer in case we were
;; in a recursive invocation of the debugger, otherwise just
;; erase the buffer and put it into fundamental mode.