changeset 83136:72439f0b5650

Fix terminal coding system in multibyte locales (rep. by Friedrich Delgado Friedrichs). lisp/international/mule-cmds.el (configure-display-for-locale): Override default-enable-multibyte-characters when setting up the terminal coding system. git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-176
author Karoly Lorentey <lorentey@elte.hu>
date Tue, 25 May 2004 02:08:47 +0000
parents 0c9a34bef526
children d663e2b036e0
files lisp/international/mule-cmds.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el	Tue May 25 01:18:01 2004 +0000
+++ b/lisp/international/mule-cmds.el	Tue May 25 02:08:47 2004 +0000
@@ -2385,7 +2385,11 @@
 	;; we are using single-byte characters,
 	;; so the display table and terminal coding system are irrelevant.
 	(when default-enable-multibyte-characters
-	  (set-display-table-and-terminal-coding-system language-name))
+	  ;; Override default-terminal-coding-system in case the
+	  ;; display coding can not be derived from the language
+	  ;; environment.
+	  (let ((default-terminal-coding-system coding-system))
+	    (set-display-table-and-terminal-coding-system language-name)))
 
 	;; Set the `keyboard-coding-system' if appropriate (tty
 	;; only).  At least X and MS Windows can generate