1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-03 22:20:52 -08:00

(vip-get-filenames-from-buffer): Add &optional.

This commit is contained in:
Karl Heuer 1996-07-17 21:13:24 +00:00
parent b3f1e86f93
commit ffb7fd7c7f

View file

@ -478,7 +478,7 @@ to write a custom function, similar to `vip-ex-nontrivial-find-file-unix'."
;; return a list of file names listed in the buffer beginning at point
;; If optional arg is supplied, assume each filename is listed on a separate
;; line
(defun vip-get-filenames-from-buffer (one-per-line)
(defun vip-get-filenames-from-buffer (&optional one-per-line)
(let ((skip-chars (if one-per-line "\t\n" " \t\n"))
result fname delim)
(skip-chars-forward skip-chars)