diff options
Diffstat (limited to 'src/keyboard.c')
| -rw-r--r-- | src/keyboard.c | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index c84e5d7bedc..d0b081e5cdd 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -127,8 +127,8 @@ KBOARD the_only_kboard; | |||
| 127 | #endif | 127 | #endif |
| 128 | 128 | ||
| 129 | /* Non-nil disable property on a command means | 129 | /* Non-nil disable property on a command means |
| 130 | do not execute it; call disabled-command-hook's value instead. */ | 130 | do not execute it; call disabled-command-function's value instead. */ |
| 131 | Lisp_Object Qdisabled, Qdisabled_command_hook; | 131 | Lisp_Object Qdisabled, Qdisabled_command_function; |
| 132 | 132 | ||
| 133 | #define NUM_RECENT_KEYS (100) | 133 | #define NUM_RECENT_KEYS (100) |
| 134 | int recent_keys_index; /* Index for storing next element into recent_keys */ | 134 | int recent_keys_index; /* Index for storing next element into recent_keys */ |
| @@ -9736,9 +9736,9 @@ a special event, so ignore the prefix argument and don't clear it. */) | |||
| 9736 | tem = Fget (cmd, Qdisabled); | 9736 | tem = Fget (cmd, Qdisabled); |
| 9737 | if (!NILP (tem) && !NILP (Vrun_hooks)) | 9737 | if (!NILP (tem) && !NILP (Vrun_hooks)) |
| 9738 | { | 9738 | { |
| 9739 | tem = Fsymbol_value (Qdisabled_command_hook); | 9739 | tem = Fsymbol_value (Qdisabled_command_function); |
| 9740 | if (!NILP (tem)) | 9740 | if (!NILP (tem)) |
| 9741 | return call1 (Vrun_hooks, Qdisabled_command_hook); | 9741 | return call1 (Vrun_hooks, Qdisabled_command_function); |
| 9742 | } | 9742 | } |
| 9743 | } | 9743 | } |
| 9744 | 9744 | ||
| @@ -10916,8 +10916,8 @@ syms_of_keyboard () | |||
| 10916 | Qtimer_event_handler = intern ("timer-event-handler"); | 10916 | Qtimer_event_handler = intern ("timer-event-handler"); |
| 10917 | staticpro (&Qtimer_event_handler); | 10917 | staticpro (&Qtimer_event_handler); |
| 10918 | 10918 | ||
| 10919 | Qdisabled_command_hook = intern ("disabled-command-hook"); | 10919 | Qdisabled_command_function = intern ("disabled-command-function"); |
| 10920 | staticpro (&Qdisabled_command_hook); | 10920 | staticpro (&Qdisabled_command_function); |
| 10921 | 10921 | ||
| 10922 | Qself_insert_command = intern ("self-insert-command"); | 10922 | Qself_insert_command = intern ("self-insert-command"); |
| 10923 | staticpro (&Qself_insert_command); | 10923 | staticpro (&Qself_insert_command); |
| @@ -11414,6 +11414,7 @@ The elements of the list are event types that may have menu bar bindings. */); | |||
| 11414 | doc: /* Per-terminal keymap that overrides all other local keymaps. | 11414 | doc: /* Per-terminal keymap that overrides all other local keymaps. |
| 11415 | If this variable is non-nil, it is used as a keymap instead of the | 11415 | If this variable is non-nil, it is used as a keymap instead of the |
| 11416 | buffer's local map, and the minor mode keymaps and text property keymaps. | 11416 | buffer's local map, and the minor mode keymaps and text property keymaps. |
| 11417 | It also overrides `overriding-local-map'. | ||
| 11417 | This variable is intended to let commands such as `universal-argument' | 11418 | This variable is intended to let commands such as `universal-argument' |
| 11418 | set up a different keymap for reading the next command. */); | 11419 | set up a different keymap for reading the next command. */); |
| 11419 | 11420 | ||