Mercurial > emacs
diff src/keyboard.h @ 83391:e99392472e41
Change `keyboard-translate-table' to be terminal-local.
* lisp/subr.el (keyboard-translate): Use `terminal-local-value' to access `keyboard-translate-table'.
* lisp/obsolete/keyswap.el: Ditto.
* src/keyboard.c (Vkeyboard_translate_table): Moved to struct kboard.
* src/keyboard.h (Vkeyboard_translate_table): Moved to struct kboard.
* src/keyboard.c (read_char): Use current_kboard to access Vkeyboard_translate_table.
* src/keymap.c (Fdescribe_buffer_bindings): Ditto.
* src/keyboard.c (init_kboard): Initialize Vkeyboard_translate_table.
* src/keyboard.c (syms_of_keyboard): Use DEFVAR_KBOARD to define
Vkeyboard_translate_table. Update doc strings.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-431
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Fri, 28 Oct 2005 14:29:24 +0000 |
parents | 0b75ace4f7ad |
children | ec395f552d45 |
line wrap: on
line diff
--- a/src/keyboard.h Fri Oct 28 11:12:17 2005 +0000 +++ b/src/keyboard.h Fri Oct 28 14:29:24 2005 +0000 @@ -81,6 +81,9 @@ other commands. */ Lisp_Object Vreal_last_command; + /* User-supplied table to translate input characters through. */ + Lisp_Object Vkeyboard_translate_table; + /* The prefix argument for the next command, in raw form. */ Lisp_Object Vprefix_arg; @@ -302,8 +305,6 @@ extern Lisp_Object parse_modifiers P_ ((Lisp_Object)); extern Lisp_Object reorder_modifiers P_ ((Lisp_Object)); extern Lisp_Object read_char P_ ((int, int, Lisp_Object *, Lisp_Object, int *)); -/* User-supplied string to translate input characters through. */ -extern Lisp_Object Vkeyboard_translate_table; /* Parent keymap of terminal-local function-key-map instances. */ extern Lisp_Object Vfunction_key_map;