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

[Richard M . Stallman]

Index: emacs/lisp/progmodes/gud.el
diff -c emacs/lisp/progmodes/gud.el:1.43 emacs/lisp/progmodes/gud.el:1.44
*** emacs/lisp/progmodes/gud.el:1.43    Fri Jun 24 01:31:50 2005
--- emacs/lisp/progmodes/gud.el Sat Jun 25 13:52:15 2005
***************
*** 2534,2549 ****
            ;; This must be outside of the save-excursion
            ;; in case the source file is our current buffer.
            (if process-window
!               (save-selected-window
!                 (select-window process-window)
                  (gud-display-frame))
              ;; We have to be in the proper buffer, (process-buffer proc),
              ;; but not in a save-excursion, because that would restore point.
!             (let ((old-buf (current-buffer)))
!               (set-buffer (process-buffer proc))
!               (unwind-protect
!                   (gud-display-frame)
!                 (set-buffer old-buf)))))
  
          ;; If we deferred text that arrived during this processing,
          ;; handle it now.
--- 2534,2545 ----
            ;; This must be outside of the save-excursion
            ;; in case the source file is our current buffer.
            (if process-window
!               (with-selected-window
                  (gud-display-frame))
              ;; We have to be in the proper buffer, (process-buffer proc),
              ;; but not in a save-excursion, because that would restore point.
!             (with-current-buffer (process-buffer proc)
!               (gud-display-frame))))
  
          ;; If we deferred text that arrived during this processing,
          ;; handle it now.