diff options
Diffstat (limited to 'lisp/misearch.el')
| -rw-r--r-- | lisp/misearch.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/misearch.el b/lisp/misearch.el index 36a7afe518c..958c10a1bf6 100644 --- a/lisp/misearch.el +++ b/lisp/misearch.el @@ -316,10 +316,9 @@ Every next/previous file in the defined sequence is visited by (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 - (format-prompt "First file to search" - (file-name-nondirectory buffer-file-name)) - default-directory buffer-file-name))) + (let* ((files (list (read-file-name "First file to search: " + default-directory + buffer-file-name))) (file nil)) (while (not (string-equal (setq file (read-file-name |