andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(set-language-environment): Set current-iso639-language

Browse source
This commit is contained in:
Kenichi Handa 2008-05-14 01:55:06 +00:00
parent 11d957768b
commit 8aeebac24a
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/international/mule-cmds.el
View file

@ -1843,6 +1843,9 @@ specifies the character set for the major languages of Western Europe."
(if (functionp func)
(funcall func)))
(setq current-iso639-language
(get-language-info language-name 'iso639-language))
(run-hooks 'set-language-environment-hook)
(force-mode-line-update t))