Mercurial > emacs
changeset 51815:81538ceba107
2003-07-08 Kim F. Storm <storm@cua.dk>
* international/mule-cmds.el (set-display-table-and-terminal-coding-system):
Don't break bootstrap if standard-display-table isn't setup yet.
| author | John Paul Wallington <jpw@pobox.com> |
|---|---|
| date | Tue, 08 Jul 2003 09:22:52 +0000 |
| parents | 4dbb30eefc67 |
| children | 196b83881b7b |
| files | lisp/international/mule-cmds.el |
| diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el Tue Jul 08 03:39:24 2003 +0000 +++ b/lisp/international/mule-cmds.el Tue Jul 08 09:22:52 2003 +0000 @@ -1689,11 +1689,12 @@ ;; case the user has used standard-display-european earlier in ;; this session. (The MS-DOS port doesn't use that setup, so it ;; doesn't need to undo it.) - (dotimes (i 128) - (aset standard-display-table (+ i 128) nil)) - (aset standard-display-table 146 nil)) + (when standard-display-table + (dotimes (i 128) + (aset standard-display-table (+ i 128) nil)) + (aset standard-display-table 146 nil))) (or (eq window-system 'pc) - (set-terminal-coding-system coding)))) + (set-terminal-coding-system coding)))) (defun set-language-environment (language-name) "Set up multi-lingual environment for using LANGUAGE-NAME.