From 237e59935a55a6e31008e2fecb4ad0179929ba80 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Fri, 3 Jan 2003 20:11:15 +0000 Subject: [PATCH] (register-char-codings): Don't call optimize-char-coding-system-table here. (keyboard-coding-system): Doc fix. Update :version. --- lisp/international/mule.el | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 0a9751b984c..ed40b8f2152 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -663,7 +663,10 @@ CODING-SYSTEM as a general one which can encode all characters." (generic-char-p key)) (push charset partials))))))) safe-chars) - (optimize-char-coding-system-table) + ;; This is probably too expensive (e.g. multiple calls in + ;; ucs-tables), and only really relevant in certain cases, so do + ;; it explicitly where appropriate. + ;; (optimize-char-coding-system-table) (set-char-table-extra-slot char-coding-system-table 1 partials)))) (defun make-subsidiary-coding-system (coding-system) @@ -1295,6 +1298,8 @@ If you set this on a terminal which can't distinguish Meta keys from 8-bit characters, you will have to use ESC to type Meta characters. See Info node `Specify Coding' and Info node `Single-Byte Character Support'. +On non-windowing terminals, this is set from the locale by default. + Setting this variable directly does not take effect; use either M-x customize or \\[set-keyboard-coding-system]." :type '(coding-system :tag "Coding system") @@ -1305,7 +1310,7 @@ use either M-x customize or \\[set-keyboard-coding-system]." (if (or value (boundp 'encoded-kbd-mode)) (set-keyboard-coding-system value) (set-default 'keyboard-coding-system nil))) ; must initialize - :version "21.1" + :version "21.4" :group 'keyboard :group 'mule) -- 2.39.2