Mercurial > hg > xemacs-beta

comparison lisp/mule/mule-init.el @ 367:a4f53d9b3154 r21-1-13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-1-13
author cvs
date Mon, 13 Aug 2007 11:01:07 +0200
parents 4f79e16b1112
children
comparison
equal deleted inserted replaced
366:83d76f480a59 367:a4f53d9b3154
74 ; (setq language (cdr (assoc language help-with-tutorial-language-alist))) 74 ; (setq language (cdr (assoc language help-with-tutorial-language-alist)))
75 ; (help-with-tutorial (concat "mule/TUTORIAL" (or language "")))) 75 ; (help-with-tutorial (concat "mule/TUTORIAL" (or language ""))))
76 76
77 (defvar auto-language-alist 77 (defvar auto-language-alist
78 '(("^ja" . "Japanese") 78 '(("^ja" . "Japanese")
79 ("^zh" . "Chinese") 79 ("^zh_CN" . "Chinese-GB")
80 ("^zh_TW" . "Chinese-BIG5")
80 ("^ko" . "Korean")) 81 ("^ko" . "Korean"))
81 "Alist of LANG patterns vs. corresponding language environment. 82 "Alist of LANG patterns vs. corresponding language environment.
82 Each element looks like (REGEXP . LANGUAGE-ENVIRONMENT). 83 Each element looks like (REGEXP . LANGUAGE-ENVIRONMENT).
83 It the value of the environment variable LANG matches the regexp REGEXP, 84 It the value of the environment variable LANG matches the regexp REGEXP,
84 then `set-language-environment' is called with LANGUAGE-ENVIRONMENT.") 85 then `set-language-environment' is called with LANGUAGE-ENVIRONMENT.")