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

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3a56fa7..f1e905c 100644 (file)
--- 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\e,Bm\e(Bk  <Pavel@Janik.cz>
 

diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index d1e6215..67586e4 100644 (file)
--- 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)