# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 736726872 0
# Node ID b8c5199f31afbc34b514290a735755e5debd2004
# Parent  e0f465034c6277a66cab27e1cc8b4d2acde50788
(flush-lines, keep-lines, how-many):
Delete spurious `s' from prompt arg to read-from-minibuffer.

diff -r e0f465034c62 -r b8c5199f31af lisp/replace.el
--- a/lisp/replace.el	Thu May 06 20:17:22 1993 +0000
+++ b/lisp/replace.el	Thu May 06 22:21:12 1993 +0000
@@ -152,7 +152,7 @@
 A match split across lines preserves all the lines it lies in.
 Applies to all lines after point."
   (interactive (list (read-from-minibuffer
-		      "sKeep lines (containing match for regexp): "
+		      "Keep lines (containing match for regexp): "
 		      nil nil nil 'regexp-history)))
   (save-excursion
     (or (bolp) (forward-line 1))
@@ -179,7 +179,7 @@
 If a match is split across lines, all the lines it lies in are deleted.
 Applies to lines after point."
   (interactive (list (read-from-minibuffer
-		      "sFlush lines (containing match for regexp): "
+		      "Flush lines (containing match for regexp): "
 		      nil nil nil 'regexp-history)))
   (save-excursion
     (while (and (not (eobp))
@@ -193,7 +193,7 @@
 (defun how-many (regexp)
   "Print number of matches for REGEXP following point."
   (interactive (list (read-from-minibuffer
-		      "sHow many matches for (regexp): "
+		      "How many matches for (regexp): "
 		      nil nil nil 'regexp-history)))
   (let ((count 0) opoint)
     (save-excursion