Function: multi-isearch-read-files

multi-isearch-read-files is a byte-compiled function defined in misearch.el.gz.

Signature

(multi-isearch-read-files)

Documentation

Return a list of files specified interactively, one by one.

Source Code

;; Defined in /usr/src/emacs/lisp/misearch.el.gz
(defun multi-isearch-read-files ()
  "Return a list of files specified interactively, one by one."
  ;; Most code from `multi-occur'.
  (let* ((files (list (read-file-name "First file to search: "
				      default-directory
				      buffer-file-name)))
	 (file nil))
    (while (not (file-equal-p
		 (setq file (read-file-name
			     "Next file to search (RET to end): "
			     default-directory
			     default-directory))
		 default-directory))
      (cl-pushnew file files :test #'equal))
    (nreverse files)))