# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1235748696 0
# Node ID 7f8b299098d7f39514de2af8afbec81997cb0f63
# Parent  5feec5ab80888db84d9442f7eec8c7903e3a9b59
(keep-lines-read-args): Use empty string as default (Bug#2495).

diff -r 5feec5ab8088 -r 7f8b299098d7 lisp/replace.el
--- a/lisp/replace.el	Fri Feb 27 15:31:07 2009 +0000
+++ b/lisp/replace.el	Fri Feb 27 15:31:36 2009 +0000
@@ -570,7 +570,7 @@
   "Read arguments for `keep-lines' and friends.
 Prompt for a regexp with PROMPT.
 Value is a list, (REGEXP)."
-  (list (read-regexp prompt) nil nil t))
+  (list (read-regexp prompt "") nil nil t))
 
 (defun keep-lines (regexp &optional rstart rend interactive)
   "Delete all lines except those containing matches for REGEXP.