Mercurial > emacs
changeset 12003:58854589c7f7
(gud-perldb-massage-args): Pass `-emacs' after the file name.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Mon, 29 May 1995 20:13:06 +0000 |
| parents | 9d22f732d7d8 |
| children | b28537b10443 |
| files | lisp/gud.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gud.el Mon May 29 20:10:58 1995 +0000 +++ b/lisp/gud.el Mon May 29 20:13:06 1995 +0000 @@ -881,7 +881,7 @@ (defvar gud-perldb-history nil) (defun gud-perldb-massage-args (file args) - (cons "-d" (cons "-emacs" args))) + (cons "-d" (cons (car args) (cons "-emacs" (cdr args))))) ;; There's no guarantee that Emacs will hand the filter the entire ;; marker at once; it could be broken up across several strings. We