Mercurial > emacs
changeset 2685:b8c5199f31af
(flush-lines, keep-lines, how-many):
Delete spurious `s' from prompt arg to read-from-minibuffer.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 06 May 1993 22:21:12 +0000 |
| parents | e0f465034c62 |
| children | a84b9a78ab08 |
| files | lisp/replace.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- 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