fix
authoryoichi <yoichi>
Sat, 21 Dec 2002 15:13:58 +0000 (15:13 +0000)
committeryoichi <yoichi>
Sat, 21 Dec 2002 15:13:58 +0000 (15:13 +0000)
WL-MK

diff --git a/WL-MK b/WL-MK
index 40ec8a8..4b5f568 100644 (file)
--- a/WL-MK
+++ b/WL-MK
            (unless (re-search-forward "^;;; -\\*- news-list -\\*-" nil t)
              (error "Invalid wl-news.el.in"))
            (forward-line 2)
-           (insert "(defconst wl-news-news-alist\n  '")
-           (prin1 (wl-news-parse-news wl-news-lang) (current-buffer))
-           (insert ")\n")
+           (if wl-news-lang
+               (progn
+                 (insert "(defconst wl-news-news-alist\n  '")
+                 (prin1 (wl-news-parse-news wl-news-lang) (current-buffer))
+                 (insert ")\n"))
+             (insert "(defconst wl-news-news-alist nil)\n\n"))
            (let ((buffer-file-coding-system (mime-charset-to-coding-system 'x-ctext)))
              (write-region (point-min) (point-max) out-filename)))))))