diff src/keyboard.c @ 29717:acaa36b47f50

fix up more Lisp_Object/int conversion issues
author Ken Raeburn <raeburn@raeburn.org>
date Sun, 18 Jun 2000 20:14:37 +0000
parents f276bf2f52f0
children c9430bc1c824
line wrap: on
line diff
--- a/src/keyboard.c	Sun Jun 18 20:14:35 2000 +0000
+++ b/src/keyboard.c	Sun Jun 18 20:14:37 2000 +0000
@@ -7974,7 +7974,8 @@
 		      string = POSN_STRING (EVENT_START (key));
 		      pos = XCDR (string);
 		      string = XCAR (string);
-                      if (pos >= 0 && pos < XSTRING (string)->size)
+                      if (XINT (pos) >= 0
+			  && XINT (pos) < XSTRING (string)->size)
                         {
                           map = Fget_text_property (pos, Qlocal_map, string);
                           if (!NILP (map))