Mercurial > emacs
comparison lisp/progmodes/gud.el @ 78533:8bf8256b3ffa
(gud-common-init): Use new name split-string-and-unquote.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 12 Aug 2007 18:02:39 +0000 |
| parents | 419c5c316b51 |
| children | d8140314e60f e5a68f18fcb9 |
comparison
equal
deleted
inserted
replaced
| 78532:97bfd89475cd | 78533:8bf8256b3ffa |
|---|---|
| 2460 ;; which starts with the program to debug. | 2460 ;; which starts with the program to debug. |
| 2461 ;; The other three args specify the values to use | 2461 ;; The other three args specify the values to use |
| 2462 ;; for local variables in the debugger buffer. | 2462 ;; for local variables in the debugger buffer. |
| 2463 (defun gud-common-init (command-line massage-args marker-filter | 2463 (defun gud-common-init (command-line massage-args marker-filter |
| 2464 &optional find-file) | 2464 &optional find-file) |
| 2465 (let* ((words (string->strings command-line)) | 2465 (let* ((words (split-string-and-unquote command-line)) |
| 2466 (program (car words)) | 2466 (program (car words)) |
| 2467 (dir default-directory) | 2467 (dir default-directory) |
| 2468 ;; Extract the file name from WORDS | 2468 ;; Extract the file name from WORDS |
| 2469 ;; and put t in its place. | 2469 ;; and put t in its place. |
| 2470 ;; Later on we will put the modified file name arg back there. | 2470 ;; Later on we will put the modified file name arg back there. |