diff options
author | Karl Heuer <kwzh@gnu.org> | 1995-05-29 20:13:06 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1995-05-29 20:13:06 +0000 |
commit | fb171fa62c6a3be7246894e40de816a17245bda9 (patch) | |
tree | 3254a14ab8127bb5930a55551948370b09ef7e11 /lisp/gud.el | |
parent | ffcaf8c742f85e431b435825fd5972aa688e533e (diff) | |
download | emacs-fb171fa62c6a3be7246894e40de816a17245bda9.tar.gz |
(gud-perldb-massage-args): Pass `-emacs' after the file name.
Diffstat (limited to 'lisp/gud.el')
-rw-r--r-- | lisp/gud.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gud.el b/lisp/gud.el index 90810c6c6ac..adfc14fdbb4 100644 --- a/lisp/gud.el +++ b/lisp/gud.el @@ -881,7 +881,7 @@ directories if your program contains sources from more than one directory." (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 |