From bcdf86fb51ea5a3860aaade93276f2661cbc70b2 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Fri, 28 Jul 2006 23:20:21 +0000 Subject: [PATCH] (grep-read-files): Use car of grep-files-history or grep-files-aliases as default if nothing else applies. --- lisp/progmodes/grep.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el index 96f449c2b05..1c29bfe9cc8 100644 --- a/lisp/progmodes/grep.el +++ b/lisp/progmodes/grep.el @@ -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" -- 2.39.2