Mercurial > hg > xemacs-beta

diff src/keymap.c @ 400:a86b2b5e0111 r21-2-30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-30
author cvs
date Mon, 13 Aug 2007 11:14:34 +0200
parents 74fd4e045ea6
children 2f8bb876ab1d
line wrap: on
line diff
--- a/src/keymap.c	Mon Aug 13 11:13:33 2007 +0200
+++ b/src/keymap.c	Mon Aug 13 11:14:34 2007 +0200
@@ -1069,7 +1069,7 @@
 	  if (!INTP (XCDR (idx)))
 	    return Qnil;
 	  indirection.keysym = XCAR (idx);
-	  indirection.modifiers = XINT (XCDR (idx));
+	  indirection.modifiers = (unsigned char) XINT (XCDR (idx));
 	}
       else if (SYMBOLP (idx))
 	{
@@ -4204,6 +4204,8 @@
 void
 syms_of_keymap (void)
 {
+  INIT_LRECORD_IMPLEMENTATION (keymap);
+
   defsymbol (&Qminor_mode_map_alist, "minor-mode-map-alist");
 
   defsymbol (&Qkeymapp, "keymapp");