# HG changeset patch
# User Nick Roberts <nickrob@snap.net.nz>
# Date 1144892304 0
# Node ID f4b6648f6d4fe54214f66010a01d849cad8aa27e
# Parent  64b708bcb93a0088de4f15755e76b8a2068906da
(gdb-set-gud-minor-mode-existing-buffers):
GDB 6.1+ gives full filename for "info sources" so use
file-name-nondirectory.

diff -r 64b708bcb93a -r f4b6648f6d4f lisp/progmodes/gdb-ui.el
--- 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