WL-MK (make-wl-news): Do not use 4th and 5th arg of replace-regexp.

diff --git a/WL-MK b/WL-MK
index 74303dc..d706e76 100644 (file)
--- a/WL-MK
+++ b/WL-MK
@@ -489,7 +489,10 @@
                  (let ((p (point)))
                    (prin1 (wl-news-parse-news wl-news-lang) (current-buffer))
                    (save-excursion
-                     (replace-regexp "^(" "\\\\(" nil p (point)))) ; avoid font-lock confusion
+                     (narrow-to-region p (point))
+                     (goto-char (1+ p))
+                     (replace-regexp "^(" "\\\\(") ; avoid font-lock confusion
+                     (widen)))
                  (insert ")\n"))
              (insert "(defconst wl-news-news-alist nil)\n\n"))
            (let ((buffer-file-coding-system (mime-charset-to-coding-system 'x-ctext)))