diff options
| author | Karl Heuer | 1996-07-17 21:13:24 +0000 |
|---|---|---|
| committer | Karl Heuer | 1996-07-17 21:13:24 +0000 |
| commit | ffb7fd7c7f5bd2800a471e3d2ae28ed857f1f178 (patch) | |
| tree | 2e46a7c30ca46f6a16c9f746b0e5153e201712c3 | |
| parent | b3f1e86f933cb2e6edeee9dadb0c8958d80be5d0 (diff) | |
| download | emacs-ffb7fd7c7f5bd2800a471e3d2ae28ed857f1f178.tar.gz emacs-ffb7fd7c7f5bd2800a471e3d2ae28ed857f1f178.zip | |
(vip-get-filenames-from-buffer): Add &optional.
| -rw-r--r-- | lisp/emulation/viper-util.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emulation/viper-util.el b/lisp/emulation/viper-util.el index 33f9dfc0c35..7cc64938254 100644 --- a/lisp/emulation/viper-util.el +++ b/lisp/emulation/viper-util.el | |||
| @@ -478,7 +478,7 @@ to write a custom function, similar to `vip-ex-nontrivial-find-file-unix'." | |||
| 478 | ;; return a list of file names listed in the buffer beginning at point | 478 | ;; return a list of file names listed in the buffer beginning at point |
| 479 | ;; If optional arg is supplied, assume each filename is listed on a separate | 479 | ;; If optional arg is supplied, assume each filename is listed on a separate |
| 480 | ;; line | 480 | ;; line |
| 481 | (defun vip-get-filenames-from-buffer (one-per-line) | 481 | (defun vip-get-filenames-from-buffer (&optional one-per-line) |
| 482 | (let ((skip-chars (if one-per-line "\t\n" " \t\n")) | 482 | (let ((skip-chars (if one-per-line "\t\n" " \t\n")) |
| 483 | result fname delim) | 483 | result fname delim) |
| 484 | (skip-chars-forward skip-chars) | 484 | (skip-chars-forward skip-chars) |