From 11a4c81538dadf7e0f805b9ac0e8563b98f2f94b Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 25 Oct 2002 16:26:53 +0000
Subject: [PATCH] (ids-dump-range): Use `utf-8-mcs-er' instead of `utf-8'.

---
 ids-dump.el |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ids-dump.el b/ids-dump.el
index 3372f10..678d6aa 100644
--- a/ids-dump.el
+++ b/ids-dump.el
@@ -145,10 +145,10 @@
 
 (defun ids-dump-range (file path func &rest args)
   (with-temp-buffer
-    (let* ((coding-system-for-write 'utf-8))
+    (let* ((coding-system-for-write 'utf-8-mcs-er))
       (if (file-directory-p path)
 	  (setq path (expand-file-name file path)))
-      (insert ";; -*- coding: utf-8 -*-\n")
+      (insert ";; -*- coding: utf-8-mcs-er -*-\n")
       (apply func args)
       (write-region (point-min)(point-max) path))))
 
-- 
1.7.10.4