1688 |
(let ((coding (get-language-info language-name 'unibyte-display))) |
(let ((coding (get-language-info language-name 'unibyte-display))) |
1689 |
(if coding |
(if coding |
1690 |
(standard-display-european-internal) |
(standard-display-european-internal) |
1691 |
|
;; The following 2 lines undo the 8-bit display that we set up |
1692 |
|
;; in standard-display-european-internal, which see. This is in |
1693 |
|
;; case the user has used standard-display-european earlier in |
1694 |
|
;; this session. (The MS-DOS port doesn't use that setup, so it |
1695 |
|
;; doesn't need to undo it.) |
1696 |
(standard-display-default (if (eq window-system 'pc) 128 160) 255) |
(standard-display-default (if (eq window-system 'pc) 128 160) 255) |
1697 |
(aset standard-display-table 146 nil)) |
(aset standard-display-table 146 nil)) |
1698 |
(or (eq window-system 'pc) |
(or (eq window-system 'pc) |