Mercurial > hg > xemacs-beta

comparison src/event-stream.c @ 408:501cfd01ee6d r21-2-34

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-34
author cvs
date Mon, 13 Aug 2007 11:18:11 +0200
parents b8cc9ab3f761
children de805c49cfc1
comparison
equal deleted inserted replaced
407:ed6218a7d4d3 408:501cfd01ee6d
118 /* Hook run when XEmacs is about to be idle. */ 118 /* Hook run when XEmacs is about to be idle. */
119 Lisp_Object Qpre_idle_hook, Vpre_idle_hook; 119 Lisp_Object Qpre_idle_hook, Vpre_idle_hook;
120 120
121 /* Control gratuitous keyboard focus throwing. */ 121 /* Control gratuitous keyboard focus throwing. */
122 int focus_follows_mouse; 122 int focus_follows_mouse;
123
124 int modifier_keys_are_sticky;
123 125
124 #if 0 /* FSF Emacs crap */ 126 #if 0 /* FSF Emacs crap */
125 /* Hook run after a command if there's no more input soon. */ 127 /* Hook run after a command if there's no more input soon. */
126 Lisp_Object Qpost_command_idle_hook, Vpost_command_idle_hook; 128 Lisp_Object Qpost_command_idle_hook, Vpost_command_idle_hook;
127 129
4752 If lookup still fails, a normal error is signalled. In general, 4754 If lookup still fails, a normal error is signalled. In general,
4753 you should *bind* this, not set it. 4755 you should *bind* this, not set it.
4754 */ ); 4756 */ );
4755 Vretry_undefined_key_binding_unshifted = Qt; 4757 Vretry_undefined_key_binding_unshifted = Qt;
4756 4758
4759 DEFVAR_BOOL ("modifier-keys-are-sticky", &modifier_keys_are_sticky /*
4760 *Non-nil makes modifier keys sticky.
4761 This means that you can release the modifier key before pressing down
4762 the key that you wish to be modified. Although this is non-standard
4763 behavior, it is recommended because it reduces the strain on your hand,
4764 thus reducing the incidence of the dreaded Emacs-pinky syndrome.
4765 */ );
4766 modifier_keys_are_sticky = 0;
4767
4757 #ifdef HAVE_XIM 4768 #ifdef HAVE_XIM
4758 DEFVAR_LISP ("composed-character-default-binding", 4769 DEFVAR_LISP ("composed-character-default-binding",
4759 &Vcomposed_character_default_binding /* 4770 &Vcomposed_character_default_binding /*
4760 The default keybinding to use for key events from composed input. 4771 The default keybinding to use for key events from composed input.
4761 Window systems frequently have ways to allow the user to compose 4772 Window systems frequently have ways to allow the user to compose