(gud-gdb-massage-args): Pass default-directory to gdb.

diff --git a/lisp/gud.el b/lisp/gud.el
index b582a6c6df9d7190cebaa35417c2b13cad540bb7..6a44bfbf05f101c100b1f81cb815f5efdbbb1407 100644 (file)
--- a/lisp/gud.el
+++ b/lisp/gud.el
@@ -307,7 +307,8 @@ off the specialized speedbar mode."
 (defvar gud-gdb-history nil)
 
 (defun gud-gdb-massage-args (file args)
-  (cons "-fullname" args))
+  (cons "-cd" (cons (expand-file-name default-directory)
+                   (cons "-fullname" args))))
 
 (defvar gud-gdb-marker-regexp
   ;; This used to use path-separator instead of ":";