From: yoichi <yoichi>
Date: Fri, 7 Feb 2003 16:20:24 +0000 (+0000)
Subject: * WL-MK (make-wl-news): Don't use replace-regexp.
X-Git-Tag: wl-2_11_3~16
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b2a91d173d646401650acdcebd352cd7fb8659fc;p=elisp%2Fwanderlust.git

* WL-MK (make-wl-news): Don't use replace-regexp.
---

diff --git a/WL-MK b/WL-MK
index d706e76..9823afd 100644
--- a/WL-MK
+++ b/WL-MK
@@ -491,7 +491,8 @@
 		    (save-excursion
 		      (narrow-to-region p (point))
 		      (goto-char (1+ p))
-		      (replace-regexp "^(" "\\\\(") ; avoid font-lock confusion
+		      (while (re-search-forward "^(" nil t)
+			(replace-match "\\\\(")) ; avoid font-lock confusion
 		      (widen)))
 		  (insert ")\n"))
 	      (insert "(defconst wl-news-news-alist nil)\n\n"))