Mercurial > emacs
diff lisp/gud.el @ 48011:6ee65f935a8c
(gdb): Pass default-directory to GDB via -cd option.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 26 Oct 2002 22:37:04 +0000 |
parents | cfea5643ff62 |
children | b82c4ff4d201 |
line wrap: on
line diff
--- a/lisp/gud.el Sat Oct 26 22:36:09 2002 +0000 +++ b/lisp/gud.el Sat Oct 26 22:37:04 2002 +0000 @@ -405,7 +405,9 @@ and source-file directory for your debugger." (interactive (list (gud-query-cmdline 'gdb))) - (gud-common-init command-line nil + (gud-common-init command-line + #'(lambda (file args) + `("-cd" ,(expand-file-name default-directory) . ,args)) 'gud-gdb-marker-filter 'gud-gdb-find-file) (set (make-local-variable 'gud-minor-mode) 'gdb)