Mercurial > emacs
comparison src/keymap.c @ 76269:54d760abd1c5
*** empty log message ***
| author | David Kastrup <dak@gnu.org> |
|---|---|
| date | Fri, 02 Mar 2007 08:45:13 +0000 |
| parents | 42d89518722a |
| children | a31980a5f310 edf631bdbb7a ec58e5c426ef |
comparison
equal
deleted
inserted
replaced
| 76268:2fb154fe6599 | 76269:54d760abd1c5 |
|---|---|
| 1610 scrollbar or mode line */ | 1610 scrollbar or mode line */ |
| 1611 = AREF (key, SYMBOLP (AREF (key, 0)) && ASIZE (key) > 1 ? 1 : 0); | 1611 = AREF (key, SYMBOLP (AREF (key, 0)) && ASIZE (key) > 1 ? 1 : 0); |
| 1612 | 1612 |
| 1613 /* We are not interested in locations without event data */ | 1613 /* We are not interested in locations without event data */ |
| 1614 | 1614 |
| 1615 if (EVENT_HAS_PARAMETERS (event)) | 1615 if (EVENT_HAS_PARAMETERS (event) && CONSP (XCDR (event))) |
| 1616 { | 1616 { |
| 1617 Lisp_Object kind = EVENT_HEAD_KIND (EVENT_HEAD (event)); | 1617 Lisp_Object kind = EVENT_HEAD_KIND (EVENT_HEAD (event)); |
| 1618 if (CONSP (XCDR (event)) && EQ (kind, Qmouse_click)) | 1618 if (EQ (kind, Qmouse_click)) |
| 1619 position = EVENT_START (event); | 1619 position = EVENT_START (event); |
| 1620 } | 1620 } |
| 1621 } | 1621 } |
| 1622 | 1622 |
| 1623 /* Key sequences beginning with mouse clicks | 1623 /* Key sequences beginning with mouse clicks |
