diff options
| -rw-r--r-- | lisp/international/mule-cmds.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index e9b769d9c12..43f0334a562 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -1688,6 +1688,11 @@ The default status is as follows: | |||
| 1688 | (let ((coding (get-language-info language-name 'unibyte-display))) | 1688 | (let ((coding (get-language-info language-name 'unibyte-display))) |
| 1689 | (if coding | 1689 | (if coding |
| 1690 | (standard-display-european-internal) | 1690 | (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.) | ||
| 1691 | (standard-display-default (if (eq window-system 'pc) 128 160) 255) | 1696 | (standard-display-default (if (eq window-system 'pc) 128 160) 255) |
| 1692 | (aset standard-display-table 146 nil)) | 1697 | (aset standard-display-table 146 nil)) |
| 1693 | (or (eq window-system 'pc) | 1698 | (or (eq window-system 'pc) |