Mercurial > emacs
changeset 88503:d864d6412004
(utf-8-emacs): Add various
:mime-charset properties.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Tue, 14 May 2002 10:17:56 +0000 |
| parents | edebd2ea0273 |
| children | 3ef048e3d781 |
| files | lisp/international/mule-conf.el |
| diffstat | 1 files changed, 10 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-conf.el Tue May 14 10:16:42 2002 +0000 +++ b/lisp/international/mule-conf.el Tue May 14 10:17:56 2002 +0000 @@ -675,13 +675,15 @@ "Support for all Emacs characters (including non-Unicode characters)." :coding-type 'utf-8 :mnemonic ?U - :charset-list '(emacs)) + :charset-list '(emacs) + :mime-charset 'utf-8) (define-coding-system 'utf-16 "UTF-16" :coding-type 'utf-16 :mnemonic ?U - :charset-list '(unicode)) + :charset-list '(unicode) + :mime-charset 'utf-16) (define-coding-system 'utf-16-le-nosig "UTF-16, little endian, no signature" @@ -703,7 +705,8 @@ :mnemonic ?U :charset-list '(unicode) :bom t - :endian 'little) + :endian 'little + :mime-charset 'utf-16-le) (define-coding-system 'utf-16-be "UTF-16, big endian, with signature" @@ -711,7 +714,8 @@ :mnemonic ?U :charset-list '(unicode) :bom t - :endian 'big) + :endian 'big + :mime-charset 'utf-16-be) (define-coding-system 'iso-2022-7bit "ISO 2022 based 7-bit encoding using only G0" @@ -780,6 +784,8 @@ :designation [(ascii 94) (latin-iso8859-1 katakana-jisx0201 96) nil nil] :flags '(ascii-at-eol ascii-at-cntl designation locking-shift single-shift composition) + ;; Fixme: this isn't a valid MIME charset and has to be + ;; special-cased elsewhere -- fx :mime-charset 'x-ctext) (define-coding-system-alias 'x-ctext 'compound-text)