diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-05-06 22:21:12 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-05-06 22:21:12 +0000 |
| commit | 72f21cdfe326949c5c12b39ae5b14b628c000749 (patch) | |
| tree | f9aa68b2a39e7c06d75d82f5368c3b900dc44d71 | |
| parent | 4f8cc93a21915f05f11a39f747032064799e17e2 (diff) | |
| download | emacs-72f21cdfe326949c5c12b39ae5b14b628c000749.tar.gz emacs-72f21cdfe326949c5c12b39ae5b14b628c000749.tar.bz2 emacs-72f21cdfe326949c5c12b39ae5b14b628c000749.zip | |
(flush-lines, keep-lines, how-many):
Delete spurious `s' from prompt arg to read-from-minibuffer.
| -rw-r--r-- | lisp/replace.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index a3e2f03a5fa..488e1f19603 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -152,7 +152,7 @@ which will run faster and will not set the mark or print anything." 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 @@ Applies to all lines after point." 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 @@ Applies to lines after point." (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 |