Mercurial > hg > xemacs-beta

comparison src/keymap.c @ 189:489f57a838ef r20-3b21

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b21
author cvs
date Mon, 13 Aug 2007 09:57:07 +0200
parents 3d6bfa290dbd
children a2f645c6b9f8
comparison
equal deleted inserted replaced
188:e29a8e7498d9 189:489f57a838ef
1555 is silently converted into 'escape' by the keyboard driver. 1555 is silently converted into 'escape' by the keyboard driver.
1556 In this case, ASCII is the only thing we know about, so we have 1556 In this case, ASCII is the only thing we know about, so we have
1557 to compare the ASCII values. */ 1557 to compare the ASCII values. */
1558 1558
1559 GCPRO1 (event2); 1559 GCPRO1 (event2);
1560 event2 = Fmake_event (); 1560 event2 = Fmake_event (Qnil, Qnil);
1561 Fcharacter_to_event (key_specifier, event2, Qnil, Qnil); 1561 Fcharacter_to_event (key_specifier, event2, Qnil, Qnil);
1562 if (XEVENT (event2)->event_type != key_press_event) 1562 if (XEVENT (event2)->event_type != key_press_event)
1563 retval = 0; 1563 retval = 0;
1564 else if (CONSOLE_TTY_P (XCONSOLE (EVENT_CHANNEL (event)))) 1564 else if (CONSOLE_TTY_P (XCONSOLE (EVENT_CHANNEL (event))))
1565 { 1565 {