Mercurial > emacs

comparison src/keyboard.h @ 109591:1fb35da4a097

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from mainline.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Thu, 29 Jul 2010 23:01:42 +0000
parents 228a5fa4eda0
children fc7a8c411aa3
comparison
equal deleted inserted replaced
109590:3c9de3b961fe 109591:1fb35da4a097
420 420
421 /* The values of Qevent_kind properties. */ 421 /* The values of Qevent_kind properties. */
422 extern Lisp_Object Qfunction_key, Qmouse_click, Qmouse_movement; 422 extern Lisp_Object Qfunction_key, Qmouse_click, Qmouse_movement;
423 extern Lisp_Object Qscroll_bar_movement; 423 extern Lisp_Object Qscroll_bar_movement;
424 424
425 extern Lisp_Object Qhelp_echo;
426
425 /* Getting the kind of an event head. */ 427 /* Getting the kind of an event head. */
426 #define EVENT_HEAD_KIND(event_head) \ 428 #define EVENT_HEAD_KIND(event_head) \
427 (Fget ((event_head), Qevent_kind)) 429 (Fget ((event_head), Qevent_kind))
428 430
429 /* Symbols to use for non-text mouse positions. */ 431 /* Symbols to use for non-text mouse positions. */
430 extern Lisp_Object Qmode_line, Qvertical_line, Qheader_line; 432 extern Lisp_Object Qmode_line, Qvertical_line, Qheader_line;
433
434 /* True while doing kbd input. */
435 extern int waiting_for_input;
436
437 /* Address (if not 0) of EMACS_TIME to zero out if a SIGIO interrupt
438 happens. */
439 extern EMACS_TIME *input_available_clear_time;
440
441 extern int ignore_mouse_drag_p;
442
443 extern Lisp_Object Vdouble_click_time;
431 444
432 /* Forward declaration for prototypes. */ 445 /* Forward declaration for prototypes. */
433 struct input_event; 446 struct input_event;
434 447
435 extern Lisp_Object parse_modifiers (Lisp_Object); 448 extern Lisp_Object parse_modifiers (Lisp_Object);
442 /* Parent keymap of terminal-local function-key-map instances. */ 455 /* Parent keymap of terminal-local function-key-map instances. */
443 extern Lisp_Object Vfunction_key_map; 456 extern Lisp_Object Vfunction_key_map;
444 457
445 /* Keymap of key translations that can override keymaps. */ 458 /* Keymap of key translations that can override keymaps. */
446 extern Lisp_Object Vkey_translation_map; 459 extern Lisp_Object Vkey_translation_map;
460
461 /* This is like Vthis_command, except that commands never set it. */
462 extern Lisp_Object real_this_command;
463
464 /* If the lookup of the command returns a binding, the original
465 command is stored in this-original-command. It is nil otherwise. */
466 extern Lisp_Object Vthis_original_command;
447 467
448 extern int parse_menu_item (Lisp_Object, int); 468 extern int parse_menu_item (Lisp_Object, int);
449 469
450 extern void echo_now (void); 470 extern void echo_now (void);
451 extern void init_kboard (KBOARD *); 471 extern void init_kboard (KBOARD *);