Commit 166aaf6f authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(occur): If no default, don't mention one.

parent f05f43e7
......@@ -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
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment