changeset 29277:6f7f86b93247

(Qkeymap): New variable. (syms_of_textprop): Intern it.
author Dave Love <fx@gnu.org>
date Mon, 29 May 2000 11:37:57 +0000
parents 03ac8f012b94
children fcb030c7708e
files src/textprop.c
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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);