--- vz.el.org	Tue Jan 16 22:24:32 1996
+++ vz.el	Fri Feb 15 00:00:40 2002
@@ -923,7 +923,10 @@
 	(while (funcall func vz-last-replace-from nil t)
 	  (if (or (not vz-replace-with-prompt) (vz-y-or-n-p "置換しますか？"))
 	      (progn
-		(replace-match vz-last-replace-to nil t)
+;; 2002/02/13 modified by [yoh] (matsuda@palnet.or.jp)
+;; わかってしまえばごくごく単純なバグでした。
+;		(replace-match vz-last-replace-to nil t)
+		(replace-match vz-last-replace-to t t)
 		(setq c (1+ c)))))
       (quit c))
     c))