From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 13 Sep 1997 19:05:54 +0000 (+0000)
Subject: (standard-display-european): Do something useful where AUTO is t or a symbol.
X-Git-Tag: emacs-20.1~28
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4e633bb8eb63e7d515a84ce25b3f204a9c1d249f;p=emacs.git

(standard-display-european): Do something useful where AUTO is t or a symbol.
---

diff --git a/lisp/disp-table.el b/lisp/disp-table.el
index cb9325fd771..19187b07628 100644
--- a/lisp/disp-table.el
+++ b/lisp/disp-table.el
@@ -211,7 +211,10 @@ AUTO also specifies, in this case, the coding system for terminal output."
       ;; 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 (if auto (intern auto) 'latin-1)))
+      (set-terminal-coding-system
+       (cond ((eq auto t) 'latin-1)
+	     ((symbolp auto) (or auto 'latin-1))
+	     ((stringp auto) (intern auto)))))
     ;; 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])