international/mule-conf.el (compound-text-with-extensions): Add :mime-charset propert...

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 87b54707e0a142c850c59766f26af5190b056b50..bc8840819a3c1ee6851eaf8f3e0b92fff489b80b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-10-07  Kenichi Handa  <handa@gnu.org>
+
+       * international/mule-conf.el (compound-text-with-extensions): Add
+       :mime-charset property as x-ctext.
+
 2012-10-06  Ikumi Keita  <ikumi@ikumi.que.jp>  (tiny change)
 
        * international/characters.el: Fix simple mistake ((car chars) ->

diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el
index 4647b778e59437cdda8d2f12230e211bbc205a77..11207b0b78dc1b9647b384fb6cbc0798a14140cf 100644 (file)
--- a/lisp/international/mule-conf.el
+++ b/lisp/international/mule-conf.el
@@ -1458,7 +1458,8 @@ for decoding and encoding files, process I/O, etc."
   :flags '(ascii-at-eol ascii-at-cntl long-form
                        designation locking-shift single-shift)
   :post-read-conversion 'ctext-post-read-conversion
-  :pre-write-conversion 'ctext-pre-write-conversion)
+  :pre-write-conversion 'ctext-pre-write-conversion
+  :mime-charset 'x-ctext)
 
 (define-coding-system-alias
   'x-ctext-with-extensions 'compound-text-with-extensions)