Mercurial > emacs
changeset 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 | d7662618cd11 |
| children | 73c9cc6e8538 |
| files | lisp/gud.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
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)