(query-replace-read-from, query-replace-read-to):

Remove 8th arg KEEP-ALL in read-from-minibuffer.

diff --git a/lisp/replace.el b/lisp/replace.el
index f1792b499fcd93f1ef446e3bff9f4bf88b7fd889..305573ad0e56c77ac734a927fac51091a8c98cf3 100644 (file)
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -113,7 +113,7 @@ wants to replace FROM with TO."
                 (format "%s: " prompt))
               nil nil nil
               query-replace-from-history-variable
-              nil t t))))
+              nil t))))
       (if (and (zerop (length from)) lastto lastfrom)
          (progn
            (set query-replace-from-history-variable
@@ -180,7 +180,7 @@ the original string if not."
      (read-from-minibuffer
       (format "%s %s with: " prompt (query-replace-descr from))
       nil nil nil
-      query-replace-to-history-variable from t t))
+      query-replace-to-history-variable from t))
    regexp-flag))
 
 (defun query-replace-read-args (prompt regexp-flag &optional noerror)