(define-coding-system-alias 'iso-2022-cn 'iso-2022-cn-ext)
-(define-prefix-command 'describe-chinese-support-map)
-(define-key-after describe-language-support-map [Chinese]
- '("Chinese" . describe-chinese-support-map)
+(define-prefix-command 'describe-chinese-environment-map)
+(define-key-after describe-language-environment-map [Chinese]
+ '("Chinese" . describe-chinese-environment-map)
t)
(define-prefix-command 'setup-chinese-environment-map)
(coding-system . (cn-gb-2312 hz-gb-2312 iso-2022-cn))
(sample-text . "Chinese (\e$AVPND\e(B,\e$AFUM(;0\e(B,\e$A::So\e(B) \e$ADc:C\e(B")
(documentation . ("Support for Chinese GB2312 character set."
- . describe-chinese-support-map))
+ . describe-chinese-environment-map))
))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(coding-system . (cn-big5 iso-2022-cn))
(sample-text . "Cantonese (\e$(0GnM$\e(B,\e$(0N]0*Hd\e(B) \e$(0*/=(\e(B, \e$(0+$)p\e(B")
(documentation . ("Support for Chinese Big5 character set."
- . describe-chinese-support-map))
+ . describe-chinese-environment-map))
))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
chinese-cns11643-7))
(coding-system . (iso-2022-cn))
(documentation . ("Support for Chinese CNS character sets."
- . describe-chinese-support-map))
+ . describe-chinese-environment-map))
))
;;; chinese.el ends here