Mercurial > emacs

changeset 89403:e7eb0fa7dce7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(utf-16-le): Renamed from utf-16-le-nosig. (utf-16-be): Renamed from utf-16-be-nosig. (utf-16-le-with-sig): Renamed from utf-16-le. (utf-16-be-with-sig): Renamed from utf-16-be. (utf-16): Set :bom to (utf-16-le-with-sig . utf-16-be-with-sig).
author Kenichi Handa <handa@m17n.org>
date Fri, 28 Mar 2003 04:06:53 +0000
parents e6b8ccf4cfa2
children 3e1d187b52c3
files lisp/international/mule-conf.el
diffstat 1 files changed, 20 insertions(+), 17 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-conf.el	Fri Mar 14 07:58:54 2003 +0000
+++ b/lisp/international/mule-conf.el	Fri Mar 28 04:06:53 2003 +0000
@@ -1163,44 +1163,47 @@
   :mnemonic ?U
   :charset-list '(emacs))
 
-(define-coding-system 'utf-16
-  "UTF-16"
+(define-coding-system 'utf-16-le
+  "UTF-16, little endian."
   :coding-type 'utf-16
   :mnemonic ?U
   :charset-list '(unicode)
-  :mime-charset 'utf-16)
+  :endian 'little
+  :mime-charset 'utf-16le)
 
-(define-coding-system 'utf-16-le-nosig
-  "UTF-16, little endian, no signature."
+(define-coding-system 'utf-16-be
+  "UTF-16, big endian."
   :coding-type 'utf-16
   :mnemonic ?U
   :charset-list '(unicode)
-  :endian 'little)
+  :endian 'big
+  :mime-charset 'utf-16be)
 
-(define-coding-system 'utf-16-be-nosig
-  "UTF-16, big endian, no signature."
-  :coding-type 'utf-16
-  :mnemonic ?U
-  :charset-list '(unicode)
-  :endian 'big)
-
-(define-coding-system 'utf-16-le
+(define-coding-system 'utf-16-le-with-sig
   "UTF-16, little endian, with signature."
   :coding-type 'utf-16
   :mnemonic ?U
   :charset-list '(unicode)
   :bom t
   :endian 'little
-  :mime-charset 'utf-16-le)
+  :mime-charset 'utf-16)
 
-(define-coding-system 'utf-16-be
+(define-coding-system 'utf-16-be-with-sig
   "UTF-16, big endian, with signature."
   :coding-type 'utf-16
   :mnemonic ?U
   :charset-list '(unicode)
   :bom t
   :endian 'big
-  :mime-charset 'utf-16-be)
+  :mime-charset 'utf-16)
+
+(define-coding-system 'utf-16
+  "UTF-16"
+  :coding-type 'utf-16
+  :mnemonic ?U
+  :charset-list '(unicode)
+  :bom '(utf-16-le-with-sig . utf-16-be-with-sig)
+  :mime-charset 'utf-16)
 
 (define-coding-system 'iso-2022-7bit
   "ISO 2022 based 7-bit encoding using only G0."