# HG changeset patch # User Kenichi Handa # Date 973468311 0 # Node ID 22ea1d0f7521c9b26208afad23d83a2c7724f37a # Parent 5be1bf6bfafaf187203b656b961119a24ea732d3 (compound-text): Define this coding system here. Make x-ctext and ctext aliases of it. diff -r 5be1bf6bfafa -r 22ea1d0f7521 lisp/international/mule-conf.el --- a/lisp/international/mule-conf.el Sun Nov 05 23:51:23 2000 +0000 +++ b/lisp/international/mule-conf.el Sun Nov 05 23:51:51 2000 +0000 @@ -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 `?'."