(operation query-replace): Use new `noerror' arg for

`query-replace-read-args'.
(operation query-replace-regexp): Ditto

2 files changed, 5 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3a56fa75e91..f1e905ccb1a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -7,6 +7,9 @@
 
         * ibuf-ext.el (sorter mode-name): Doc fix.
         (ibuffer-mark-help-buffers): Use `ibuffer-help-buffer-modes'.
+        (operation query-replace): Use new `noerror' arg for
+        `query-replace-read-args'.
+        (operation query-replace-regexp): Ditto
 
 2002-03-27  Pavel Jan,Bm(Bk  <Pavel@Janik.cz>
 
diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index d1e62154217..67586e43958 100644
--- a/lisp/ibuf-ext.el
+++ b/lisp/ibuf-ext.el
@@ -323,7 +323,7 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
 (define-ibuffer-op query-replace (&rest args)
   "Perform a `query-replace' in marked buffers."
   (:interactive
-   (query-replace-read-args "Query replace" t)
+   (query-replace-read-args "Query replace" t t)
    :opstring "replaced in"
    :complex t
    :modifier-p :maybe)
@@ -338,7 +338,7 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
 (define-ibuffer-op query-replace-regexp (&rest args)
   "Perform a `query-replace-regexp' in marked buffers."
   (:interactive
-   (query-replace-read-args "Query replace regexp" t)
+   (query-replace-read-args "Query replace regexp" t t)
    :opstring "replaced in"
    :complex t
    :modifier-p :maybe)