diff options
| -rw-r--r-- | lisp/progmodes/gud.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index 471d3b308ec..dc7e64e6e35 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -2534,8 +2534,9 @@ It is saved for when this flag is not set.") | |||
| 2534 | ;; This must be outside of the save-excursion | 2534 | ;; This must be outside of the save-excursion |
| 2535 | ;; in case the source file is our current buffer. | 2535 | ;; in case the source file is our current buffer. |
| 2536 | (if process-window | 2536 | (if process-window |
| 2537 | (with-selected-window | 2537 | (progn |
| 2538 | (gud-display-frame)) | 2538 | (with-selected-window process-window |
| 2539 | (gud-display-frame))) | ||
| 2539 | ;; We have to be in the proper buffer, (process-buffer proc), | 2540 | ;; We have to be in the proper buffer, (process-buffer proc), |
| 2540 | ;; but not in a save-excursion, because that would restore point. | 2541 | ;; but not in a save-excursion, because that would restore point. |
| 2541 | (with-current-buffer (process-buffer proc) | 2542 | (with-current-buffer (process-buffer proc) |