Index: emacs/lisp/emacs-lisp/debug.el
diff -c emacs/lisp/emacs-lisp/debug.el:1.80 emacs/lisp/emacs-lisp/debug.el:1.81
*** emacs/lisp/emacs-lisp/debug.el:1.80 Mon Jun 6 12:29:57 2005
--- emacs/lisp/emacs-lisp/debug.el Mon Jun 6 19:47:05 2005
***************
*** 221,232 ****
;; Still visible despite the save-window-excursion? Maybe it
;; it's in a pop-up frame. It would be annoying to delete and
;; recreate it every time the debugger stops, so instead we'll
! ;; erase it and hide it but keep it alive.
(with-current-buffer debugger-buffer
(erase-buffer)
(fundamental-mode)
(with-selected-window (get-buffer-window debugger-buffer 0)
! (bury-buffer)))
(kill-buffer debugger-buffer))
(set-match-data debugger-outer-match-data)))
;; Put into effect the modified values of these variables
--- 221,238 ----
;; Still visible despite the save-window-excursion? Maybe it
;; it's in a pop-up frame. It would be annoying to delete and
;; recreate it every time the debugger stops, so instead we'll
! ;; erase it (and maybe hide it) but keep it alive.
(with-current-buffer debugger-buffer
(erase-buffer)
(fundamental-mode)
(with-selected-window (get-buffer-window debugger-buffer 0)
! (when (window-dedicated-p (selected-window))
! ;; If the window is not dedicated, burying the buffer
! ;; will mean that the frame created for it is left
! ;; around showing smoe random buffer, and next time we
! ;; pop to the debugger buffer we'll create yet
! ;; another frame.
! (bury-buffer))))
(kill-buffer debugger-buffer))
(set-match-data debugger-outer-match-data)))
;; Put into effect the modified values of these variables
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
