(gdb-goto-breakpoint): Use full path when setting breakpoints.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 65ec9048b3facc7425a1d22632ce120497ef4354..a8e120333f7002eb678fe6451fddde885bc94b9d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-07-29  Dmitry Dzhus  <dima@sphinx.net.ru>
+
+       * progmodes/gdb-mi.el (gdb-goto-breakpoint): Use full path when
+       setting breakpoints.
+
 2009-07-29  Jay Belanger  <jay.p.belanger@gmail.com>
 
        * calc/calc.el (calc-mode-map): Add keybinding for

diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index 4ffcb07ce9311b988a21db1477a25a6560ae39e5..c4a6134257f424b9303705ae7cf0ecf8ac026db4 100644 (file)
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -2494,7 +2494,7 @@ breakpoints buffer."
   (let ((breakpoint (get-text-property (point) 'gdb-breakpoint)))
     (if breakpoint
        (let ((bptno (gdb-get-field breakpoint 'number))
-             (file  (gdb-get-field breakpoint 'file))
+             (file  (gdb-get-field breakpoint 'fullname))
              (line  (gdb-get-field breakpoint 'line)))
          (save-selected-window
            (let* ((buffer (find-file-noselect