mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-30 08:09:04 +00:00
Code Issues Releases Activity

* language/chinese.el (chinese-iso-8bit): MIME:GB2312.

Browse Source 
(chinese-big5): MIME:Big5.

[ cited from ftp://ftp.isi.edu/in-notes/iana/assignments/character-sets ]

Name: GB2312  (preferred MIME name)
MIBenum: 2025
Source: Chinese for People's Republic of China (PRC) mixed one byte,
        two byte set:
          20-7E = one byte ASCII
          A1-FE = two byte PRC Kanji
        See GB 2312-80
        PCL Symbol Set Id: 18C
Alias: csGB2312

Name: Big5  (preferred MIME name)
MIBenum: 2026
Source: Chinese for Taiwan Multi-byte set.
        PCL Symbol Set Id: 18T
Alias: csBig5
This commit is contained in:
ShengHuo ZHU 2001-01-24 14:50:08 +00:00
parent 6801a5720e
commit ff890e66b5
2 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2001-01-24 ShengHuo ZHU <zsh@cs.rochester.edu>
* language/chinese.el (chinese-iso-8bit): MIME:GB2312.
(chinese-big5): MIME:Big5.
2001-01-24 Gerd Moellmann <gerd@gnu.org> 2001-01-24 Gerd Moellmann <gerd@gnu.org>
* international/mule-cmds.el (universal-coding-system-argument): * international/mule-cmds.el (universal-coding-system-argument):

8
lisp/language/chinese.el
View File

@ -69,11 +69,11 @@
(make-coding-system (make-coding-system
'chinese-iso-8bit 2 ?c 'chinese-iso-8bit 2 ?c
"ISO 2022 based EUC encoding for Chinese GB2312 (MIME:CN-GB)" "ISO 2022 based EUC encoding for Chinese GB2312 (MIME:GB2312)"
'(ascii chinese-gb2312 nil nil '(ascii chinese-gb2312 nil nil
nil ascii-eol ascii-cntl nil nil nil nil) nil ascii-eol ascii-cntl nil nil nil nil)
'((safe-charsets ascii chinese-gb2312) '((safe-charsets ascii chinese-gb2312)
(mime-charset . cn-gb))) (mime-charset . gb2312)))
(define-coding-system-alias 'cn-gb-2312 'chinese-iso-8bit) (define-coding-system-alias 'cn-gb-2312 'chinese-iso-8bit)
(define-coding-system-alias 'euc-china 'chinese-iso-8bit) (define-coding-system-alias 'euc-china 'chinese-iso-8bit)
@ -126,10 +126,10 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(make-coding-system (make-coding-system
'chinese-big5 3 ?B "BIG5 8-bit encoding for Chinese (MIME:CN-BIG5)" 'chinese-big5 3 ?B "BIG5 8-bit encoding for Chinese (MIME:Big5)"
nil nil
'((safe-charsets ascii chinese-big5-1 chinese-big5-2) '((safe-charsets ascii chinese-big5-1 chinese-big5-2)
(mime-charset . cn-big5) (mime-charset . big5)
(charset-origin-alist (chinese-big5-1 "BIG5" encode-big5-char) (charset-origin-alist (chinese-big5-1 "BIG5" encode-big5-char)
(chinese-big5-2 "BIG5" encode-big5-char)))) (chinese-big5-2 "BIG5" encode-big5-char))))