# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 956690306 0
# Node ID 7c903a96e495d579a1a7a575c25b7fb0a1891577
# Parent  351e38e6b866b4fdd032ab2759b327f0e8b2410d
(ebrowse-tags-query-replace): Construct a
form with additional arguments for perform-replace.

diff -r 351e38e6b866 -r 7c903a96e495 lisp/progmodes/ebrowse.el
--- a/lisp/progmodes/ebrowse.el	Tue Apr 25 19:17:18 2000 +0000
+++ b/lisp/progmodes/ebrowse.el	Tue Apr 25 19:18:26 2000 +0000
@@ -3818,7 +3818,7 @@
   (setq ebrowse-tags-loop-form
 	(list 'and (list 'save-excursion
 			 (list 're-search-forward from nil t))
-	      (list 'not (list 'perform-replace from to t t nil))))
+	      (list 'not (list 'perform-replace from to nil nil t t nil))))
   (ebrowse-tags-loop-continue 'first-time))