From: Colin Walters <walters@gnu.org>
Date: Wed, 27 Mar 2002 22:38:04 +0000 (+0000)
Subject: (operation query-replace): Use new `noerror' arg for
X-Git-Tag: ttn-vms-21-2-B4~15945
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=193f8525da8e4b2e10e3311a45a45ce67b981ff4;p=emacs.git

(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 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)