adjust messages

diff --git a/egrep.el b/egrep.el
index dda5644..521af1c 100644 (file)
--- 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))))