1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(grep-read-files): Use car of grep-files-history or grep-files-aliases

as default if nothing else applies.
This commit is contained in:
Kim F. Storm 2006-07-28 23:20:21 +00:00
parent a912bc0d0a
commit bcdf86fb51

View file

@ -620,7 +620,9 @@ substitution string. Note dynamic scoping of variables.")
(cdr alias)))
(and fn
(let ((ext (file-name-extension fn)))
(and ext (concat "*." ext))))))
(and ext (concat "*." ext))))
(car grep-files-history)
(car (car grep-files-aliases))))
(files (read-string
(concat "Search for \"" regexp
"\" in files"