[Emacs-diffs] Changes to emacs/src/keymap.c,v

[David Kastrup]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     David Kastrup <dak>     07/03/02 08:45:13

Index: keymap.c
===================================================================
RCS file: /sources/emacs/emacs/src/keymap.c,v
retrieving revision 1.345
retrieving revision 1.346
diff -u -b -r1.345 -r1.346
--- keymap.c    24 Jan 2007 00:26:30 -0000      1.345
+++ keymap.c    2 Mar 2007 08:45:13 -0000       1.346
@@ -1612,10 +1612,10 @@
 
       /* We are not interested in locations without event data */
 
-      if (EVENT_HAS_PARAMETERS (event))
+      if (EVENT_HAS_PARAMETERS (event) && CONSP (XCDR (event)))
        {
          Lisp_Object kind = EVENT_HEAD_KIND (EVENT_HEAD (event));
-         if (CONSP (XCDR (event)) && EQ (kind, Qmouse_click))
+         if (EQ (kind, Qmouse_click))
            position = EVENT_START (event);
        }
     }