diff options
| author | Kenichi Handa | 2003-06-22 23:27:03 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2003-06-22 23:27:03 +0000 |
| commit | 0e1fc6c8931fc8b7dd4252c5d2dedd10fe4d3aec (patch) | |
| tree | c00f18ba2c52577ab277df87ed3bb33249cb0eff | |
| parent | 2f1e746b76414ea42165c9c0363019110e1f6d31 (diff) | |
| download | emacs-0e1fc6c8931fc8b7dd4252c5d2dedd10fe4d3aec.tar.gz emacs-0e1fc6c8931fc8b7dd4252c5d2dedd10fe4d3aec.zip | |
(utf-16-be): Make it an alias of utf-16be-with-signature.
(utf-16-le): Make it an alias of utf-16be-with-signature.
(utf-16-be-with-signature, utf-16-le-with-signature): Remove these
coding system aliases.
| -rw-r--r-- | lisp/international/mule-conf.el | 17 |
1 files changed, 8 insertions, 9 deletions
diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el index 3c6b247dca2..38f6690114e 100644 --- a/lisp/international/mule-conf.el +++ b/lisp/international/mule-conf.el | |||
| @@ -1166,7 +1166,7 @@ is treated as a character." | |||
| 1166 | :charset-list '(emacs)) | 1166 | :charset-list '(emacs)) |
| 1167 | 1167 | ||
| 1168 | (define-coding-system 'utf-16le | 1168 | (define-coding-system 'utf-16le |
| 1169 | "UTF-16, little endian." | 1169 | "UTF-16LE (little endian, no signature (BOM))." |
| 1170 | :coding-type 'utf-16 | 1170 | :coding-type 'utf-16 |
| 1171 | :mnemonic ?U | 1171 | :mnemonic ?U |
| 1172 | :charset-list '(unicode) | 1172 | :charset-list '(unicode) |
| @@ -1175,7 +1175,7 @@ is treated as a character." | |||
| 1175 | :mime-charset 'utf-16le) | 1175 | :mime-charset 'utf-16le) |
| 1176 | 1176 | ||
| 1177 | (define-coding-system 'utf-16be | 1177 | (define-coding-system 'utf-16be |
| 1178 | "UTF-16, big endian." | 1178 | "UTF-16BE (big endian, no signature (BOM))." |
| 1179 | :coding-type 'utf-16 | 1179 | :coding-type 'utf-16 |
| 1180 | :mnemonic ?U | 1180 | :mnemonic ?U |
| 1181 | :charset-list '(unicode) | 1181 | :charset-list '(unicode) |
| @@ -1184,7 +1184,7 @@ is treated as a character." | |||
| 1184 | :mime-charset 'utf-16be) | 1184 | :mime-charset 'utf-16be) |
| 1185 | 1185 | ||
| 1186 | (define-coding-system 'utf-16le-with-signature | 1186 | (define-coding-system 'utf-16le-with-signature |
| 1187 | "UTF-16, little endian, with signature." | 1187 | "UTF-16 (little endian, with signature (BOM))." |
| 1188 | :coding-type 'utf-16 | 1188 | :coding-type 'utf-16 |
| 1189 | :mnemonic ?U | 1189 | :mnemonic ?U |
| 1190 | :charset-list '(unicode) | 1190 | :charset-list '(unicode) |
| @@ -1194,7 +1194,7 @@ is treated as a character." | |||
| 1194 | :mime-charset 'utf-16) | 1194 | :mime-charset 'utf-16) |
| 1195 | 1195 | ||
| 1196 | (define-coding-system 'utf-16be-with-signature | 1196 | (define-coding-system 'utf-16be-with-signature |
| 1197 | "UTF-16, big endian, with signature." | 1197 | "UTF-16 (big endian, with signature)." |
| 1198 | :coding-type 'utf-16 | 1198 | :coding-type 'utf-16 |
| 1199 | :mnemonic ?U | 1199 | :mnemonic ?U |
| 1200 | :charset-list '(unicode) | 1200 | :charset-list '(unicode) |
| @@ -1204,7 +1204,7 @@ is treated as a character." | |||
| 1204 | :mime-charset 'utf-16) | 1204 | :mime-charset 'utf-16) |
| 1205 | 1205 | ||
| 1206 | (define-coding-system 'utf-16 | 1206 | (define-coding-system 'utf-16 |
| 1207 | "UTF-16" | 1207 | "UTF-16 (detect endian on decoding, use big endian on encoding with BOM)." |
| 1208 | :coding-type 'utf-16 | 1208 | :coding-type 'utf-16 |
| 1209 | :mnemonic ?U | 1209 | :mnemonic ?U |
| 1210 | :charset-list '(unicode) | 1210 | :charset-list '(unicode) |
| @@ -1215,10 +1215,9 @@ is treated as a character." | |||
| 1215 | 1215 | ||
| 1216 | ;; Backwards compatibility (old names, also used by Mule-UCS). We | 1216 | ;; Backwards compatibility (old names, also used by Mule-UCS). We |
| 1217 | ;; prefer the MIME names. | 1217 | ;; prefer the MIME names. |
| 1218 | (define-coding-system-alias 'utf-16-le 'utf-16le) | 1218 | (define-coding-system-alias 'utf-16-le 'utf-16le-with-signature) |
| 1219 | (define-coding-system-alias 'utf-16-be 'utf-16be) | 1219 | (define-coding-system-alias 'utf-16-be 'utf-16be-with-signature) |
| 1220 | (define-coding-system-alias 'utf-16-le-with-signature 'utf-16le-with-signature) | 1220 | |
| 1221 | (define-coding-system-alias 'utf-16-be-with-signature 'utf-16be-with-signature) | ||
| 1222 | 1221 | ||
| 1223 | (define-coding-system 'iso-2022-7bit | 1222 | (define-coding-system 'iso-2022-7bit |
| 1224 | "ISO 2022 based 7-bit encoding using only G0." | 1223 | "ISO 2022 based 7-bit encoding using only G0." |