From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 7 Jul 2003 20:56:24 +0000 (+0000)
Subject: (set-display-table-and-terminal-coding-system):
X-Git-Tag: ttn-vms-21-2-B4~9447
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2fe837ffdc5ec488a2d87db3d92740a18e44ae2e;p=emacs.git

(set-display-table-and-terminal-coding-system):
Use explicit loop instead of calling standard-display-default.
---

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:
       ;; 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.)
-      (standard-display-default (if (eq window-system 'pc) 128 160) 255)
+      (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))))