[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/debug.el

[Stefan Monnier]

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