From 2f2a2ca7241fe8f04a07d4850fb1fcea9e3f181b Mon Sep 17 00:00:00 2001 From: okada Date: Fri, 20 Dec 2002 03:49:50 +0000 Subject: [PATCH] WL-MK (make-wl-news): Fix coding system. --- ChangeLog | 4 ++++ WL-MK | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index abce16d..53ec942 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,9 @@ 2002-12-20 Kenichi OKADA + * WL-MK (make-wl-news): Fix coding system. + +2002-12-20 Kenichi OKADA + * WL-MK (wl-news-parse-news-subr): Decide coding-system. diff --git a/WL-MK b/WL-MK index 08ff43c..6467e1a 100644 --- a/WL-MK +++ b/WL-MK @@ -484,7 +484,7 @@ (insert "(defconst wl-news-news-alist\n '") (prin1 (wl-news-parse-news wl-news-lang) (current-buffer)) (insert ")\n") - (let ((buffer-file-coding-system 'x-ctext)) + (let ((buffer-file-coding-system (mime-charset-to-coding-system 'x-ctext))) (write-region (point-min) (point-max) out-filename))))))) (defun wl-news-parse-news (lang) -- 1.7.10.4