comparison lisp/language/china-util.el @ 22987:708271862495

(setup-XXX-environment): Just call set-language-environment. If they used to do some other jobs than what done by set-language-environment, those jobs are done in setup-XXX-environment-internal now.

22986:b5c383369b40

;;;###autoload
(defun setup-chinese-gb-environment ()
  "Setup multilingual environment (MULE) for Chinese GB2312 users."
  (interactive)
  (setup-english-environment)
  (set-language-environment-coding-systems "Chinese-GB")
  (setq default-input-method  "chinese-py-punct"))

;;;###autoload
(defun setup-chinese-big5-environment ()
  "Setup multilingual environment (MULE) for Chinese Big5 users."
  (interactive)
  (setup-english-environment)
  (set-language-environment-coding-systems "Chinese-BIG5")
  (setq default-input-method "chinese-py-punct-b5"))

;;;###autoload
(defun setup-chinese-cns-environment ()
  "Setup multilingual environment (MULE) for Chinese CNS11643 family users."
  (interactive)
  (setup-english-environment)
  (set-language-environment-coding-systems "Chinese-CNS")
  (setq default-input-method "chinese-cns-quick"))

;; Hz/ZW encoding stuffs

;; HZ is an encoding method for Chinese character set GB2312 used
;; widely in Internet.  It is very similar to 7-bit environment of

22987:708271862495

;;;###autoload
(defun setup-chinese-gb-environment ()
  "Setup multilingual environment (MULE) for Chinese GB2312 users."
  (interactive)
  (set-language-environment "Chinese-GB"))

;;;###autoload
(defun setup-chinese-big5-environment ()
  "Setup multilingual environment (MULE) for Chinese Big5 users."
  (interactive)
  (set-language-environment "Chinese-BIG5"))

;;;###autoload
(defun setup-chinese-cns-environment ()
  "Setup multilingual environment (MULE) for Chinese CNS11643 family users."
  (interactive)
  (set-language-environment "Chinese-CNS"))

;; Hz/ZW encoding stuffs

;; HZ is an encoding method for Chinese character set GB2312 used
;; widely in Internet.  It is very similar to 7-bit environment of