mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-29 07:58:28 +00:00
Code Issues Releases Activity

Improve doc string and prompt of 'grep-read-files'

Browse Source 
* lisp/progmodes/grep.el (grep-read-files): Clarify in the doc
string and in the prompt that shell wildcards can be used.
Suggested by Allen Li <vianchielfaura@gmail.com>.  (Bug#28615)
This commit is contained in:
Eli Zaretskii 2017-10-09 16:39:25 +03:00
parent 2da83c9d36
commit 0c36663db5
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/progmodes/grep.el
View File

@ -903,7 +903,8 @@ substitution string. Note dynamic scoping of variables.")
(read-regexp "Search for" 'grep-tag-default 'grep-regexp-history))
(defun grep-read-files (regexp)
"Read files arg for interactive grep."
"Read a file-name pattern arg for interactive grep.
The pattern can include shell wildcards."
(let* ((bn (or (buffer-file-name)
(replace-regexp-in-string "<[0-9]+>\\'" "" (buffer-name))))
(fn (and bn
@ -936,7 +937,7 @@ substitution string. Note dynamic scoping of variables.")
(car (car grep-files-aliases))))
(files (completing-read
(concat "Search for \"" regexp
"\" in files"
"\" in files matching wildcard"
(if default (concat " (default " default ")"))
": ")
'read-file-name-internal