Mercurial > emacs
changeset 24495:14e1df6e60a8
(set-language-environment): Fix
previous change: don't use dos-codepage when unbound.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Wed, 17 Mar 1999 11:29:05 +0000 |
| parents | ea1ab7f25110 |
| children | 541ff963ba80 |
| files | lisp/international/mule-cmds.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el Wed Mar 17 11:10:29 1999 +0000 +++ b/lisp/international/mule-cmds.el Wed Mar 17 11:29:05 1999 +0000 @@ -1249,7 +1249,9 @@ (delete input-method input-method-history)))))) (let ((nonascii (get-language-info language-name 'nonascii-translation)) (dos-table - (intern (concat "cp" dos-codepage "-nonascii-translation-table")))) + (if (eq window-system 'pc) + (intern + (concat "cp" dos-codepage "-nonascii-translation-table"))))) (cond ((char-table-p nonascii) (setq nonascii-translation-table nonascii))