Mercurial > emacs
changeset 69988:f4b6648f6d4f
(gdb-set-gud-minor-mode-existing-buffers):
GDB 6.1+ gives full filename for "info sources" so use
file-name-nondirectory.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Thu, 13 Apr 2006 01:38:24 +0000 |
parents | 64b708bcb93a |
children | c3f0c8cc639e |
files | lisp/progmodes/gdb-ui.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/gdb-ui.el Thu Apr 13 01:37:37 2006 +0000 +++ b/lisp/progmodes/gdb-ui.el Thu Apr 13 01:38:24 2006 +0000 @@ -417,7 +417,8 @@ (goto-char (point-min)) (when (search-forward "read in on demand:" nil t) (while (re-search-forward gdb-source-file-regexp nil t) - (push (or (match-string 1) (match-string 2)) gdb-source-file-list)) + (push (file-name-nondirectory (or (match-string 1) (match-string 2))) + gdb-source-file-list)) (dolist (buffer (buffer-list)) (with-current-buffer buffer (when (and buffer-file-name