Mercurial > emacs
comparison lisp/progmodes/gud.el @ 94446:24da79778167
(gud-display-line): Only consider visible
frames when looking for source buffer.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Tue, 29 Apr 2008 00:44:47 +0000 |
parents | ca9efc5939fc |
children | c5e171cb3acf |
comparison
equal
deleted
inserted
replaced
94445:52a0ed7601cb | 94446:24da79778167 |
---|---|
2687 (with-current-buffer gud-comint-buffer | 2687 (with-current-buffer gud-comint-buffer |
2688 (gud-find-file true-file))) | 2688 (gud-find-file true-file))) |
2689 (window (and buffer | 2689 (window (and buffer |
2690 (or (get-buffer-window buffer) | 2690 (or (get-buffer-window buffer) |
2691 (if (memq gud-minor-mode '(gdbmi gdba)) | 2691 (if (memq gud-minor-mode '(gdbmi gdba)) |
2692 (or (if (get-buffer-window buffer 0) | 2692 (or (if (get-buffer-window buffer 'visible) |
2693 (display-buffer buffer nil 0)) | 2693 (display-buffer buffer nil 'visible)) |
2694 (unless (gdb-display-source-buffer buffer) | 2694 (unless (gdb-display-source-buffer buffer) |
2695 (gdb-display-buffer buffer nil)))) | 2695 (gdb-display-buffer buffer nil 'visible)))) |
2696 (display-buffer buffer)))) | 2696 (display-buffer buffer)))) |
2697 (pos)) | 2697 (pos)) |
2698 (if buffer | 2698 (if buffer |
2699 (progn | 2699 (progn |
2700 (with-current-buffer buffer | 2700 (with-current-buffer buffer |