# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 959600277 0
# Node ID 6f7f86b9324756e3d5636632858d10397d30d428
# Parent  03ac8f012b947d9d786c7d9a033ec7ae91ae9057
(Qkeymap): New variable.
(syms_of_textprop): Intern it.

diff -r 03ac8f012b94 -r 6f7f86b93247 src/textprop.c
--- a/src/textprop.c	Mon May 29 11:33:35 2000 +0000
+++ b/src/textprop.c	Mon May 29 11:37:57 2000 +0000
@@ -54,6 +54,7 @@
 Lisp_Object Qpoint_entered;
 Lisp_Object Qcategory;
 Lisp_Object Qlocal_map;
+Lisp_Object Qkeymap;
 
 /* Visual properties text (including strings) may have.  */
 Lisp_Object Qforeground, Qbackground, Qfont, Qunderline, Qstipple;
@@ -699,7 +700,6 @@
   else
     {
       Lisp_Object initial_value, value;
-      struct buffer *old_current_buffer = NULL;
       int count = specpdl_ptr - specpdl;
 
       if (!NILP (object))
@@ -1870,6 +1870,8 @@
   Qcategory = intern ("category");
   staticpro (&Qlocal_map);
   Qlocal_map = intern ("local-map");
+  staticpro (&Qkeymap);
+  Qkeymap = intern ("keymap");
   staticpro (&Qfront_sticky);
   Qfront_sticky = intern ("front-sticky");
   staticpro (&Qrear_nonsticky);