Mercurial > emacs
changeset 6096:443b78042b86
(Vsystem_key_alist): Renamed from Vvendor_key_alist.
(syms_of_keyboard): Rename Lisp var to system-key-alist.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 26 Feb 1994 03:42:28 +0000 |
| parents | c04ea0b0dbc0 |
| children | adf5b18629c8 |
| files | src/keyboard.c |
| diffstat | 1 files changed, 10 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/src/keyboard.c Sat Feb 26 02:24:51 1994 +0000 +++ b/src/keyboard.c Sat Feb 26 03:42:28 1994 +0000 @@ -2168,11 +2168,11 @@ /* Caches for modify_event_symbol. */ static Lisp_Object accent_key_syms; -static Lisp_Object vendor_key_syms; +static Lisp_Object system_key_syms; static Lisp_Object func_key_syms; static Lisp_Object mouse_syms; -Lisp_Object Vvendor_key_alist; +Lisp_Object Vsystem_key_alist; /* This is a list of keysym codes for special "accent" characters. It parallels lispy_accent_keys. */ @@ -2452,17 +2452,17 @@ (sizeof (lispy_accent_keys) / sizeof (lispy_accent_keys[0]))); - /* Handle vendor-specific keysyms. */ + /* Handle system-specific keysyms. */ if (event->code & (1 << 28)) { /* We need to use an alist rather than a vector as the cache since we can't make a vector long enuf. */ - if (NILP (vendor_key_syms)) - vendor_key_syms = Fcons (Qnil, Qnil); + if (NILP (system_key_syms)) + system_key_syms = Fcons (Qnil, Qnil); return modify_event_symbol (event->code & 0xffffff, event->modifiers, - Qfunction_key, Vvendor_key_alist, - 0, &vendor_key_syms, 0xffffff); + Qfunction_key, Vsystem_key_alist, + 0, &system_key_syms, 0xffffff); } return modify_event_symbol (event->code - 0xff00, @@ -5906,10 +5906,10 @@ DEFVAR_BOOL ("track-mouse", &do_mouse_tracking, "*Non-nil means generate motion events for mouse motion."); - DEFVAR_LISP ("vendor-key-alist", &Vvendor_key_alist, - "Alist of vendor-specific X windows key symbols.\n\ + DEFVAR_LISP ("system-key-alist", &Vsystem_key_alist, + "Alist of system-specific X windows key symbols.\n\ Each element should have the form (N . SYMBOL) where N is the\n\ -numeric keysym code (sans the \"vendor-specific\" bit 1<<28)\n\ +numeric keysym code (sans the \"system-specific\" bit 1<<28)\n\ and SYMBOL is its name."); Vmenu_bar_final_items = Qnil; }