Mercurial > emacs

comparison lisp/language/chinese.el @ 23769:b922cc2b350a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
("Chinese-BIG5"): Add charset-origin-alist property.
author Kenichi Handa <handa@m17n.org>
date Thu, 26 Nov 1998 08:12:12 +0000
parents 77c967512714
children c10e64cb7fb1
comparison
equal deleted inserted replaced
23768:3d079e8b2edb 23769:b922cc2b350a
151 (cons (cons "big5" ccl-encode-big5-font) font-ccl-encoder-alist)) 151 (cons (cons "big5" ccl-encode-big5-font) font-ccl-encoder-alist))
152 152
153 (set-language-info-alist 153 (set-language-info-alist
154 "Chinese-BIG5" '((charset chinese-big5-1 chinese-big5-2) 154 "Chinese-BIG5" '((charset chinese-big5-1 chinese-big5-2)
155 (coding-system chinese-big5 chinese-iso-7bit) 155 (coding-system chinese-big5 chinese-iso-7bit)
156 (charset-origin-alist
157 (chinese-big5-1 "BIG5" encode-big5-char)
158 (chinese-big5-2 "BIG5" encode-big5-char))
156 (coding-priority chinese-big5 iso-2022-cn chinese-iso-8bit) 159 (coding-priority chinese-big5 iso-2022-cn chinese-iso-8bit)
157 (input-method . "chinese-py-punct-b5") 160 (input-method . "chinese-py-punct-b5")
158 (features china-util) 161 (features china-util)
159 (sample-text . "Cantonese ($(0GnM$(B,$(0N]0*Hd(B) $(0*/=((B, $(0+$)p(B") 162 (sample-text . "Cantonese ($(0GnM$(B,$(0N]0*Hd(B) $(0*/=((B, $(0+$)p(B")
160 (documentation . "Support for Chinese Big5 character set.")) 163 (documentation . "Support for Chinese Big5 character set."))