From: tomo <tomo>
Date: Sat, 8 Nov 2003 08:01:20 +0000 (+0000)
Subject: (write-ideograph-radical-char-data): Insert coding: magic cookie.
X-Git-Tag: r21-4-14-chise-0_21-2^2~2
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4eb42bad9108adb2831dc2e42a384f55d62c7e01;p=chise%2Fxemacs-chise.git.1

(write-ideograph-radical-char-data): Insert coding: magic cookie.
---

diff --git a/lisp/utf-2000/ideograph-util.el b/lisp/utf-2000/ideograph-util.el
index c56844a..f429f77 100644
--- a/lisp/utf-2000/ideograph-util.el
+++ b/lisp/utf-2000/ideograph-util.el
@@ -332,8 +332,9 @@
 	       (format "Ideograph-R%03d-%s.el" radical name)
 	       file))))
   (with-temp-buffer
+    (insert ";; -*- coding: utf-8-mcs -*-\n")
     (insert-ideograph-radical-char-data radical)
-    (let ((coding-system-for-write 'utf-8))
+    (let ((coding-system-for-write 'utf-8-mcs))
       (write-region (point-min)(point-max) file)
       )))