(compound-text): Define this coding system here. Make x-ctext and

ctext aliases of it.

diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el
index a1ae5fce5d1f8aa237965c9ab6bf14f2881f4dee..ec0caddb3d26093110e3513845952eb134138c82 100644 (file)
--- a/lisp/international/mule-conf.el
+++ b/lisp/international/mule-conf.el
@@ -384,7 +384,7 @@
    (composition . t)))
 
 (make-coding-system
- 'x-ctext 2 ?x
+ 'compound-text 2 ?x
  "Compound text based generic encoding for decoding unknown messages."
  '((ascii t) (latin-iso8859-1 katakana-jisx0201 t) t t
    nil ascii-eol ascii-cntl nil locking-shift single-shift nil nil nil
@@ -393,6 +393,9 @@
    (mime-charset . x-ctext)
    (composition . t)))
 
+(define-coding-system-alias 'x-ctext 'compound-text)
+(define-coding-system-alias 'ctext 'compound-text)
+
 (make-coding-system
  'iso-safe 2 ?-
  "Convert all characters but ASCII to `?'."