Mercurial > emacs
changeset 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 | f9599125f7f0 |
children | 7c7fa71cfd6e |
files | lisp/replace.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
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