summaryrefslogtreecommitdiff
path: root/lisp/gud.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-09-20 18:56:36 +0000
committerRichard M. Stallman <rms@gnu.org>1996-09-20 18:56:36 +0000
commitf55d65a166427bb7716853957e2543901224611d (patch)
treeca107283d820352fc00c0066a921f841ceb49b4e /lisp/gud.el
parentdb4042c888b7c793167e3326f5e719ac53445b15 (diff)
downloademacs-f55d65a166427bb7716853957e2543901224611d.tar.gz
(gud-display-line): Don't call display-buffer
if buffer already has a window.
Diffstat (limited to 'lisp/gud.el')
-rw-r--r--lisp/gud.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/gud.el b/lisp/gud.el
index 8d7fc1f95a5..685927b21fa 100644
--- a/lisp/gud.el
+++ b/lisp/gud.el
@@ -1,4 +1,4 @@
-;;; gud.el --- Grand Unified Debugger mode for gdb, sdb, dbx, or xdb under Emacs
+;;; gud.el --- Grand Unified Debugger mode for gdb, dbx, etc. under Emacs
;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
;; Maintainer: FSF
@@ -1355,7 +1355,8 @@ Obeying it means displaying in another window the specified file and line."
(or (eq (current-buffer) gud-comint-buffer)
(set-buffer gud-comint-buffer))
(gud-find-file true-file)))
- (window (and buffer (display-buffer buffer)))
+ (window (and buffer (or (get-buffer-window buffer)
+ (display-buffer buffer))))
(pos))
(if buffer
(progn