diff options
| author | Simon Josefsson | 2002-09-11 05:07:36 +0000 |
|---|---|---|
| committer | Simon Josefsson | 2002-09-11 05:07:36 +0000 |
| commit | cf681de6e5fe3919f94e742662d0aaefe296f286 (patch) | |
| tree | cf87c5d094b1d60b22ddeeb535b962bce22e0f8e | |
| parent | b559a041686f1e981366624a1259a7eecf1a807a (diff) | |
| download | emacs-cf681de6e5fe3919f94e742662d0aaefe296f286.tar.gz emacs-cf681de6e5fe3919f94e742662d0aaefe296f286.zip | |
(gud-gdb-massage-args): Don't secretly add -fullname.
(gud-query-cmdline): Add --fullname to the user cmdline.
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/gud.el | 4 |
2 files changed, 5 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e1b495184ca..28f9c38ebb0 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2002-09-11 Simon Josefsson <jas@extundo.com> | 1 | 2002-09-11 Simon Josefsson <jas@extundo.com> |
| 2 | 2 | ||
| 3 | * gud.el (gud-gdb-massage-args): Don't secretly add -fullname. | ||
| 4 | (gud-query-cmdline): Add --fullname to the user cmdline. | ||
| 5 | |||
| 3 | * mail/smtpmail.el (smtpmail-default-smtp-server): Doc fix. | 6 | * mail/smtpmail.el (smtpmail-default-smtp-server): Doc fix. |
| 4 | 7 | ||
| 5 | 2002-09-10 Richard M. Stallman <rms@gnu.org> | 8 | 2002-09-10 Richard M. Stallman <rms@gnu.org> |
diff --git a/lisp/gud.el b/lisp/gud.el index 751d3d80dae..70e9f1418fb 100644 --- a/lisp/gud.el +++ b/lisp/gud.el | |||
| @@ -307,7 +307,7 @@ off the specialized speedbar mode." | |||
| 307 | (defvar gud-gdb-history nil) | 307 | (defvar gud-gdb-history nil) |
| 308 | 308 | ||
| 309 | (defun gud-gdb-massage-args (file args) | 309 | (defun gud-gdb-massage-args (file args) |
| 310 | (cons "-fullname" args)) | 310 | args) |
| 311 | 311 | ||
| 312 | (defvar gud-gdb-marker-regexp | 312 | (defvar gud-gdb-marker-regexp |
| 313 | ;; This used to use path-separator instead of ":"; | 313 | ;; This used to use path-separator instead of ":"; |
| @@ -383,7 +383,7 @@ off the specialized speedbar mode." | |||
| 383 | (read-from-minibuffer | 383 | (read-from-minibuffer |
| 384 | (format "Run %s (like this): " minor-mode) | 384 | (format "Run %s (like this): " minor-mode) |
| 385 | (or (car-safe (symbol-value hist-sym)) | 385 | (or (car-safe (symbol-value hist-sym)) |
| 386 | (concat (or cmd-name (symbol-name minor-mode)) " " init)) | 386 | (concat (or cmd-name (symbol-name minor-mode)) " --fullname " init)) |
| 387 | gud-minibuffer-local-map nil | 387 | gud-minibuffer-local-map nil |
| 388 | hist-sym))) | 388 | hist-sym))) |
| 389 | 389 | ||