From 4eb42bad9108adb2831dc2e42a384f55d62c7e01 Mon Sep 17 00:00:00 2001 From: tomo Date: Sat, 8 Nov 2003 08:01:20 +0000 Subject: [PATCH] (write-ideograph-radical-char-data): Insert coding: magic cookie. --- lisp/utf-2000/ideograph-util.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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) ))) -- 1.7.10.4