Mercurial > emacs
diff lisp/replace.el @ 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 | cf85be0f7afa |
children | 31d0b9422d7b |
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)