changeset 19845:f03431d49548

(standard-display-european): If AUTO is non-nil, intern it. Don't call set-terminal-coding-system if noninteractive.
author Richard M. Stallman <rms@gnu.org>
date Tue, 09 Sep 1997 09:16:54 +0000
parents 1e682aef0ce0
children f5f2feb0bd0f
files lisp/disp-table.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/disp-table.el	Tue Sep 09 09:02:25 1997 +0000
+++ b/lisp/disp-table.el	Tue Sep 09 09:16:54 1997 +0000
@@ -204,11 +204,11 @@
     (or auto
 	(setq-default enable-multibyte-characters nil))
     (standard-display-8bit 160 255)
-    (unless (eq window-system 'x)
+    (unless (or noninteractive (eq window-system 'x))
       ;; Send those codes literally to a non-X terminal.
       ;; If AUTO is nil, we are using single-byte characters,
       ;; so it doesn't matter which one we use.
-      (set-terminal-coding-system (or auto 'latin-1)))
+      (set-terminal-coding-system (if auto (intern auto) 'latin-1)))
     ;; Make non-line-break space display as a plain space.
     ;; Most X fonts do the wrong thing for code 160.
     (aset standard-display-table 160 [32])