Mercurial > emacs
changeset 94953:80d92e1da986
(set-language-environment): Set current-iso639-language
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Wed, 14 May 2008 01:55:06 +0000 |
| parents | 09277c117521 |
| children | 81ec00f72dc6 |
| files | lisp/international/mule-cmds.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el Wed May 14 01:54:39 2008 +0000 +++ b/lisp/international/mule-cmds.el Wed May 14 01:55:06 2008 +0000 @@ -1843,6 +1843,9 @@ (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))