From: Michael Welsh Duggan <mwd@md5i.com>
Date: Sun, 23 Nov 2014 23:34:28 +0000 (-0500)
Subject: Avoid messing up buffer list when starting gud (Bug#22374)
X-Git-Tag: emacs-27.0.90~4997
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0d224e82411d9471f03fc339890d6a2952b5e239;p=emacs.git

Avoid messing up buffer list when starting gud (Bug#22374)

* lisp/progmodes/gud.el (gud-common-init): Use `display-buffer'
instead of `switch-to-buffer'.
---

diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index de398350bd2..6826674a942 100644
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -2605,7 +2605,12 @@ comint mode, which see."
 		      file-subst)))
 	 (filepart (and file-word (concat "-" (file-name-nondirectory file))))
 	 (existing-buffer (get-buffer (concat "*gud" filepart "*"))))
-    (switch-to-buffer (concat "*gud" filepart "*"))
+    (select-window
+     (display-buffer
+      (get-buffer-create (concat "*gud" filepart "*"))
+      '(display-buffer-reuse-window
+        display-buffer-in-previous-window
+        display-buffer-same-window display-buffer-pop-up-window)))
     (when (and existing-buffer (get-buffer-process existing-buffer))
       (error "This program is already being debugged"))
     ;; Set the dir, in case the buffer already existed with a different dir.