# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1017016816 0
# Node ID 43143e459aae96b1eaf1b6b76579d07f8ca66c27
# Parent  d7e7a906dbe433b0d2dfe9704fbfa4d22c2b7ac7
(tags-query-replace): Pass t for NOERROR to query-replace-read-args.

diff -r d7e7a906dbe4 -r 43143e459aae lisp/progmodes/etags.el
--- a/lisp/progmodes/etags.el	Mon Mar 25 00:39:41 2002 +0000
+++ b/lisp/progmodes/etags.el	Mon Mar 25 00:40:16 2002 +0000
@@ -1733,7 +1733,7 @@
 with the command \\[tags-loop-continue].
 
 See documentation of variable `tags-file-name'."
-  (interactive (query-replace-read-args "Tags query replace (regexp)" t))
+  (interactive (query-replace-read-args "Tags query replace (regexp)" t t))
   (setq tags-loop-scan `(let ,(unless (equal from (downcase from))
 				'((case-fold-search nil)))
 			  (if (re-search-forward ',from nil t)