# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 762234148 0
# Node ID 443b78042b86372f86a49e5ef694c6fe3b79f269
# Parent  c04ea0b0dbc0f03ebd07a34218467fa6a36227f7
(Vsystem_key_alist): Renamed from Vvendor_key_alist.
(syms_of_keyboard): Rename Lisp var to system-key-alist.

diff -r c04ea0b0dbc0 -r 443b78042b86 src/keyboard.c
--- 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;
 }