diff options
| author | Richard M. Stallman | 2003-07-07 20:56:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2003-07-07 20:56:24 +0000 |
| commit | 2fe837ffdc5ec488a2d87db3d92740a18e44ae2e (patch) | |
| tree | fe8a4a2069488d2b41a031d32e3d06ce0c207009 | |
| parent | 34301ace3d23760e4a9fddfaf53f386faa375029 (diff) | |
| download | emacs-2fe837ffdc5ec488a2d87db3d92740a18e44ae2e.tar.gz emacs-2fe837ffdc5ec488a2d87db3d92740a18e44ae2e.zip | |
(set-display-table-and-terminal-coding-system):
Use explicit loop instead of calling standard-display-default.
| -rw-r--r-- | lisp/international/mule-cmds.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 204e0bfb4fe..8d23b259801 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -1689,7 +1689,8 @@ The default status is as follows: | |||
| 1689 | ;; case the user has used standard-display-european earlier in | 1689 | ;; case the user has used standard-display-european earlier in |
| 1690 | ;; this session. (The MS-DOS port doesn't use that setup, so it | 1690 | ;; this session. (The MS-DOS port doesn't use that setup, so it |
| 1691 | ;; doesn't need to undo it.) | 1691 | ;; doesn't need to undo it.) |
| 1692 | (standard-display-default (if (eq window-system 'pc) 128 160) 255) | 1692 | (dotimes (i 128) |
| 1693 | (aset standard-display-table (+ i 128) nil)) | ||
| 1693 | (aset standard-display-table 146 nil)) | 1694 | (aset standard-display-table 146 nil)) |
| 1694 | (or (eq window-system 'pc) | 1695 | (or (eq window-system 'pc) |
| 1695 | (set-terminal-coding-system coding)))) | 1696 | (set-terminal-coding-system coding)))) |