# HG changeset patch # User Karoly Lorentey # Date 1130510514 0 # Node ID 2fdf37d06e0cfbf5016293d78f4565991993c73e # Parent e99392472e41cb68a5ca75745d7b46f7fcf3cd06 Don't try to rebind the `t' symbol. * lisp/subr.el (keyboard-translate): Fix stupid thinko. git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-432 diff -r e99392472e41 -r 2fdf37d06e0c lisp/subr.el --- a/lisp/subr.el Fri Oct 28 14:29:24 2005 +0000 +++ b/lisp/subr.el Fri Oct 28 14:41:54 2005 +0000 @@ -495,10 +495,10 @@ "Translate character FROM to TO at a low level. This function creates a `keyboard-translate-table' if necessary and then modifies one entry in it." - (let (t (terminal-local-value 'keyboard-translate-table)) - (or (char-table-p t) - (setq t (make-char-table 'keyboard-translate-table nil))) - (aset t from to))) + (let (tbl (terminal-local-value 'keyboard-translate-table)) + (or (char-table-p tbl) + (setq tbl (make-char-table 'keyboard-translate-table nil))) + (aset tbl from to))) ;;;; The global keymap tree.