Mercurial > emacs
changeset 58362:0301caf145d2
(query-replace-read-to, query-replace-read-from):
Specify t for KEEP-ALL in read-from-minibuffer.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 20 Nov 2004 22:09:50 +0000 |
parents | 726c49e05ed9 |
children | f8ac0eb0faa3 |
files | lisp/replace.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/replace.el Sat Nov 20 22:09:16 2004 +0000 +++ b/lisp/replace.el Sat Nov 20 22:09:50 2004 +0000 @@ -92,7 +92,7 @@ (format "%s: " string)) nil nil nil query-replace-from-history-variable - nil t)))) + nil t t)))) (if (and (zerop (length from)) lastto lastfrom) (cons lastfrom (query-replace-compile-replacement lastto regexp-flag)) @@ -156,7 +156,7 @@ (read-from-minibuffer (format "%s %s with: " string (query-replace-descr from)) nil nil nil - query-replace-to-history-variable from t)) + query-replace-to-history-variable from t t)) regexp-flag)) (defun query-replace-read-args (string regexp-flag &optional noerror)