Mercurial > emacs
diff lisp/replace.el @ 4262:bc0af06c6e3c
(occur): If no default, don't mention one.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 24 Jul 1993 18:42:33 +0000 |
parents | d89645572b0f |
children | 847ef9a62e5d |
line wrap: on
line diff
--- a/lisp/replace.el Sat Jul 24 17:35:02 1993 +0000 +++ b/lisp/replace.el Sat Jul 24 18:42:33 1993 +0000 @@ -276,7 +276,9 @@ (interactive (list (let* ((default (car regexp-history)) (input (read-from-minibuffer - (format "List lines matching regexp (default `%s'): " default) + (if default + (format "List lines matching regexp (default `%s'): " default) + "List lines matching regexp: ") nil nil nil 'regexp-history))) (if (> (length input) 0) input