Mercurial > emacs

diff lisp/replace.el @ 4262:bc0af06c6e3c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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