comparison lisp/progmodes/grep.el @ 72165:301cc56a3482

(grep-read-files): Use car of grep-files-history or grep-files-aliases as default if nothing else applies.

72164:636d15c88534

			    (setq aliases nil)
			  (setq alias nil)))
		      (cdr alias)))
	       (and fn
		    (let ((ext (file-name-extension fn)))
		      (and ext (concat "*." ext))))))
	 (files (read-string
		 (concat "Search for \"" regexp
			 "\" in files"
			 (if default (concat " (default " default ")"))
			 ": ")

72165:301cc56a3482

			    (setq aliases nil)
			  (setq alias nil)))
		      (cdr alias)))
	       (and fn
		    (let ((ext (file-name-extension fn)))
		      (and ext (concat "*." ext))))
	       (car grep-files-history)
	       (car (car grep-files-aliases))))
	 (files (read-string
		 (concat "Search for \"" regexp
			 "\" in files"
			 (if default (concat " (default " default ")"))
			 ": ")