From 4e633bb8eb63e7d515a84ce25b3f204a9c1d249f Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 13 Sep 1997 19:05:54 +0000 Subject: [PATCH] (standard-display-european): Do something useful where AUTO is t or a symbol. --- lisp/disp-table.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) 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]) -- 2.39.5