From: Stefan Bund Date: Tue, 13 Sep 2011 08:09:34 +0000 (+0200) Subject: adjust messages X-Git-Url: http://g0dil.de/git?a=commitdiff_plain;h=dca6e39e1d1a2a097e7d96749e0b194cd00d28ac;p=emacs-egrep.git adjust messages --- diff --git a/egrep.el b/egrep.el index dda5644..521af1c 100644 --- a/egrep.el +++ b/egrep.el @@ -52,7 +52,7 @@ (loop for file-name in (dired-get-marked-files nil current-prefix-arg) do (let ((buffer (find-file-noselect file-name))) (with-current-buffer buffer - (message (format "Search '%s'" file-name)) + (message (format "Searching %s ..." (file-name-nondirectory file-name))) (sit-for .1) (if prepare (funcall prepare)) (egrep-regexps-1 result-buffer regexp predicate args))))