(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 5a09d5dd196937877c658e90f09abe2820ca64c4..a342eb0b6fcfcbf4e5240f4406b36363033cc659 100644 (file)
--- 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