diff options
author | Richard M. Stallman <rms@gnu.org> | 1993-07-24 18:42:33 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1993-07-24 18:42:33 +0000 |
commit | 3a0b67d10bdfde2f13086edd03e1b86221fa0f29 (patch) | |
tree | 9dddc82c6f3e22d6afe8dbe02b8dcf5c53195962 /lisp/replace.el | |
parent | 2300f80b64ec6cfad8dcfb8638c8426431acefda (diff) | |
download | emacs-3a0b67d10bdfde2f13086edd03e1b86221fa0f29.tar.gz |
(occur): If no default, don't mention one.
Diffstat (limited to 'lisp/replace.el')
-rw-r--r-- | lisp/replace.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index 49f3920dded..2a4dad983a1 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -276,7 +276,9 @@ It serves as a menu to find any of the occurrences in this buffer. (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 |