From: Nick Roberts <nickrob@snap.net.nz>
Date: Mon, 27 Feb 2006 09:15:58 +0000 (+0000)
Subject: (gud-display-line): Use gdb-display-source-buffer
X-Git-Tag: emacs-pretest-22.0.90~3873
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5674718576a5ca046f4589450cd509f8b2402694;p=emacs.git

(gud-display-line): Use gdb-display-source-buffer
for gdb-ui/gdb-mi (old concept).
---

diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index 5a09d5dd196..a342eb0b6fc 100644
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -2753,9 +2753,10 @@ Obeying it means displaying in another window the specified file and line."
 	  (with-current-buffer gud-comint-buffer
 	    (gud-find-file true-file)))
 	 (window (and buffer (or (get-buffer-window buffer)
-				   (display-buffer buffer))))
+				 (if (memq gud-minor-mode '(gdbmi gdba))
+				     (gdb-display-source-buffer buffer))
+				 (display-buffer buffer))))
 	 (pos))
-    (message "%s %s" (current-buffer) buffer)
     (if buffer
 	(progn
 	  (with-current-buffer buffer