diff options
| author | Paul Eggert | 2012-02-10 10:58:48 -0800 |
|---|---|---|
| committer | Paul Eggert | 2012-02-10 10:58:48 -0800 |
| commit | 6e6c82a4e687708d5a7a3887f92db45bd74da276 (patch) | |
| tree | 85dc3105240e84a8cddadb25d572e170fcdbd8bc /src/keyboard.c | |
| parent | 78df1fb1d46d556bfc2698ca1802972b13613ba8 (diff) | |
| parent | cc26d239af9a82cff079556a1daff4b4bf60eb5c (diff) | |
| download | emacs-6e6c82a4e687708d5a7a3887f92db45bd74da276.tar.gz emacs-6e6c82a4e687708d5a7a3887f92db45bd74da276.zip | |
Merge from trunk.
Diffstat (limited to 'src/keyboard.c')
| -rw-r--r-- | src/keyboard.c | 29 |
1 files changed, 16 insertions, 13 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index da15f663a0d..09743be6c3c 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -1747,7 +1747,9 @@ adjust_point_for_property (ptrdiff_t last_pt, int modified) | |||
| 1747 | { | 1747 | { |
| 1748 | xassert (end > PT); | 1748 | xassert (end > PT); |
| 1749 | SET_PT (PT < last_pt | 1749 | SET_PT (PT < last_pt |
| 1750 | ? (STRINGP (val) && SCHARS (val) == 0 ? beg - 1 : beg) | 1750 | ? (STRINGP (val) && SCHARS (val) == 0 |
| 1751 | ? max (beg - 1, BEGV) | ||
| 1752 | : beg) | ||
| 1751 | : end); | 1753 | : end); |
| 1752 | check_composition = check_invisible = 1; | 1754 | check_composition = check_invisible = 1; |
| 1753 | } | 1755 | } |
| @@ -11840,38 +11842,39 @@ result of looking up the original command in the active keymaps. */); | |||
| 11840 | Vthis_original_command = Qnil; | 11842 | Vthis_original_command = Qnil; |
| 11841 | 11843 | ||
| 11842 | DEFVAR_INT ("auto-save-interval", auto_save_interval, | 11844 | DEFVAR_INT ("auto-save-interval", auto_save_interval, |
| 11843 | doc: /* *Number of input events between auto-saves. | 11845 | doc: /* Number of input events between auto-saves. |
| 11844 | Zero means disable autosaving due to number of characters typed. */); | 11846 | Zero means disable autosaving due to number of characters typed. */); |
| 11845 | auto_save_interval = 300; | 11847 | auto_save_interval = 300; |
| 11846 | 11848 | ||
| 11847 | DEFVAR_LISP ("auto-save-timeout", Vauto_save_timeout, | 11849 | DEFVAR_LISP ("auto-save-timeout", Vauto_save_timeout, |
| 11848 | doc: /* *Number of seconds idle time before auto-save. | 11850 | doc: /* Number of seconds idle time before auto-save. |
| 11849 | Zero or nil means disable auto-saving due to idleness. | 11851 | Zero or nil means disable auto-saving due to idleness. |
| 11850 | After auto-saving due to this many seconds of idle time, | 11852 | After auto-saving due to this many seconds of idle time, |
| 11851 | Emacs also does a garbage collection if that seems to be warranted. */); | 11853 | Emacs also does a garbage collection if that seems to be warranted. */); |
| 11852 | XSETFASTINT (Vauto_save_timeout, 30); | 11854 | XSETFASTINT (Vauto_save_timeout, 30); |
| 11853 | 11855 | ||
| 11854 | DEFVAR_LISP ("echo-keystrokes", Vecho_keystrokes, | 11856 | DEFVAR_LISP ("echo-keystrokes", Vecho_keystrokes, |
| 11855 | doc: /* *Nonzero means echo unfinished commands after this many seconds of pause. | 11857 | doc: /* Nonzero means echo unfinished commands after this many seconds of pause. |
| 11856 | The value may be integer or floating point. */); | 11858 | The value may be integer or floating point. |
| 11859 | If the value is zero, don't echo at all. */); | ||
| 11857 | Vecho_keystrokes = make_number (1); | 11860 | Vecho_keystrokes = make_number (1); |
| 11858 | 11861 | ||
| 11859 | DEFVAR_INT ("polling-period", polling_period, | 11862 | DEFVAR_INT ("polling-period", polling_period, |
| 11860 | doc: /* *Interval between polling for input during Lisp execution. | 11863 | doc: /* Interval between polling for input during Lisp execution. |
| 11861 | The reason for polling is to make C-g work to stop a running program. | 11864 | The reason for polling is to make C-g work to stop a running program. |
| 11862 | Polling is needed only when using X windows and SIGIO does not work. | 11865 | Polling is needed only when using X windows and SIGIO does not work. |
| 11863 | Polling is automatically disabled in all other cases. */); | 11866 | Polling is automatically disabled in all other cases. */); |
| 11864 | polling_period = 2; | 11867 | polling_period = 2; |
| 11865 | 11868 | ||
| 11866 | DEFVAR_LISP ("double-click-time", Vdouble_click_time, | 11869 | DEFVAR_LISP ("double-click-time", Vdouble_click_time, |
| 11867 | doc: /* *Maximum time between mouse clicks to make a double-click. | 11870 | doc: /* Maximum time between mouse clicks to make a double-click. |
| 11868 | Measured in milliseconds. The value nil means disable double-click | 11871 | Measured in milliseconds. The value nil means disable double-click |
| 11869 | recognition; t means double-clicks have no time limit and are detected | 11872 | recognition; t means double-clicks have no time limit and are detected |
| 11870 | by position only. */); | 11873 | by position only. */); |
| 11871 | Vdouble_click_time = make_number (500); | 11874 | Vdouble_click_time = make_number (500); |
| 11872 | 11875 | ||
| 11873 | DEFVAR_INT ("double-click-fuzz", double_click_fuzz, | 11876 | DEFVAR_INT ("double-click-fuzz", double_click_fuzz, |
| 11874 | doc: /* *Maximum mouse movement between clicks to make a double-click. | 11877 | doc: /* Maximum mouse movement between clicks to make a double-click. |
| 11875 | On window-system frames, value is the number of pixels the mouse may have | 11878 | On window-system frames, value is the number of pixels the mouse may have |
| 11876 | moved horizontally or vertically between two clicks to make a double-click. | 11879 | moved horizontally or vertically between two clicks to make a double-click. |
| 11877 | On non window-system frames, value is interpreted in units of 1/8 characters | 11880 | On non window-system frames, value is interpreted in units of 1/8 characters |
| @@ -11882,7 +11885,7 @@ to count as a drag. */); | |||
| 11882 | double_click_fuzz = 3; | 11885 | double_click_fuzz = 3; |
| 11883 | 11886 | ||
| 11884 | DEFVAR_BOOL ("inhibit-local-menu-bar-menus", inhibit_local_menu_bar_menus, | 11887 | DEFVAR_BOOL ("inhibit-local-menu-bar-menus", inhibit_local_menu_bar_menus, |
| 11885 | doc: /* *Non-nil means inhibit local map menu bar menus. */); | 11888 | doc: /* Non-nil means inhibit local map menu bar menus. */); |
| 11886 | inhibit_local_menu_bar_menus = 0; | 11889 | inhibit_local_menu_bar_menus = 0; |
| 11887 | 11890 | ||
| 11888 | DEFVAR_INT ("num-input-keys", num_input_keys, | 11891 | DEFVAR_INT ("num-input-keys", num_input_keys, |
| @@ -12057,7 +12060,7 @@ and the minor mode maps regardless of `overriding-local-map'. */); | |||
| 12057 | Vspecial_event_map = Fcons (intern_c_string ("keymap"), Qnil); | 12060 | Vspecial_event_map = Fcons (intern_c_string ("keymap"), Qnil); |
| 12058 | 12061 | ||
| 12059 | DEFVAR_LISP ("track-mouse", do_mouse_tracking, | 12062 | DEFVAR_LISP ("track-mouse", do_mouse_tracking, |
| 12060 | doc: /* *Non-nil means generate motion events for mouse motion. */); | 12063 | doc: /* Non-nil means generate motion events for mouse motion. */); |
| 12061 | 12064 | ||
| 12062 | DEFVAR_KBOARD ("system-key-alist", Vsystem_key_alist, | 12065 | DEFVAR_KBOARD ("system-key-alist", Vsystem_key_alist, |
| 12063 | doc: /* Alist of system-specific X windows key symbols. | 12066 | doc: /* Alist of system-specific X windows key symbols. |
| @@ -12151,7 +12154,7 @@ immediately after running `post-command-hook'. */); | |||
| 12151 | Vdelayed_warnings_list = Qnil; | 12154 | Vdelayed_warnings_list = Qnil; |
| 12152 | 12155 | ||
| 12153 | DEFVAR_LISP ("suggest-key-bindings", Vsuggest_key_bindings, | 12156 | DEFVAR_LISP ("suggest-key-bindings", Vsuggest_key_bindings, |
| 12154 | doc: /* *Non-nil means show the equivalent key-binding when M-x command has one. | 12157 | doc: /* Non-nil means show the equivalent key-binding when M-x command has one. |
| 12155 | The value can be a length of time to show the message for. | 12158 | The value can be a length of time to show the message for. |
| 12156 | If the value is non-nil and not a number, we wait 2 seconds. */); | 12159 | If the value is non-nil and not a number, we wait 2 seconds. */); |
| 12157 | Vsuggest_key_bindings = Qt; | 12160 | Vsuggest_key_bindings = Qt; |
| @@ -12211,7 +12214,7 @@ just after executing the command. */); | |||
| 12211 | 12214 | ||
| 12212 | DEFVAR_LISP ("global-disable-point-adjustment", | 12215 | DEFVAR_LISP ("global-disable-point-adjustment", |
| 12213 | Vglobal_disable_point_adjustment, | 12216 | Vglobal_disable_point_adjustment, |
| 12214 | doc: /* *If non-nil, always suppress point adjustment. | 12217 | doc: /* If non-nil, always suppress point adjustment. |
| 12215 | 12218 | ||
| 12216 | The default value is nil, in which case, point adjustment are | 12219 | The default value is nil, in which case, point adjustment are |
| 12217 | suppressed only after special commands that set | 12220 | suppressed only after special commands that set |
| @@ -12219,7 +12222,7 @@ suppressed only after special commands that set | |||
| 12219 | Vglobal_disable_point_adjustment = Qnil; | 12222 | Vglobal_disable_point_adjustment = Qnil; |
| 12220 | 12223 | ||
| 12221 | DEFVAR_LISP ("minibuffer-message-timeout", Vminibuffer_message_timeout, | 12224 | DEFVAR_LISP ("minibuffer-message-timeout", Vminibuffer_message_timeout, |
| 12222 | doc: /* *How long to display an echo-area message when the minibuffer is active. | 12225 | doc: /* How long to display an echo-area message when the minibuffer is active. |
| 12223 | If the value is not a number, such messages don't time out. */); | 12226 | If the value is not a number, such messages don't time out. */); |
| 12224 | Vminibuffer_message_timeout = make_number (2); | 12227 | Vminibuffer_message_timeout = make_number (2); |
| 12225 | 12228 | ||