/[emacs]/emacs/src/keyboard.c
ViewVC logotype

Diff of /emacs/src/keyboard.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.681.2.19 by miles, Sat Sep 4 09:20:10 2004 UTC revision 1.681.2.20 by miles, Sat Sep 4 09:21:46 2004 UTC
# Line 131  KBOARD the_only_kboard; Line 131  KBOARD the_only_kboard;
131  #endif  #endif
132    
133  /* Non-nil disable property on a command means  /* Non-nil disable property on a command means
134     do not execute it; call disabled-command-hook's value instead.  */     do not execute it; call disabled-command-function's value instead.  */
135  Lisp_Object Qdisabled, Qdisabled_command_hook;  Lisp_Object Qdisabled, Qdisabled_command_function;
136    
137  #define NUM_RECENT_KEYS (100)  #define NUM_RECENT_KEYS (100)
138  int recent_keys_index;  /* Index for storing next element into recent_keys */  int recent_keys_index;  /* Index for storing next element into recent_keys */
# Line 9665  a special event, so ignore the prefix ar Line 9665  a special event, so ignore the prefix ar
9665        tem = Fget (cmd, Qdisabled);        tem = Fget (cmd, Qdisabled);
9666        if (!NILP (tem) && !NILP (Vrun_hooks))        if (!NILP (tem) && !NILP (Vrun_hooks))
9667          {          {
9668            tem = Fsymbol_value (Qdisabled_command_hook);            tem = Fsymbol_value (Qdisabled_command_function);
9669            if (!NILP (tem))            if (!NILP (tem))
9670              return call1 (Vrun_hooks, Qdisabled_command_hook);              return call1 (Vrun_hooks, Qdisabled_command_function);
9671          }          }
9672      }      }
9673    
# Line 10782  syms_of_keyboard () Line 10782  syms_of_keyboard ()
10782    Qtimer_event_handler = intern ("timer-event-handler");    Qtimer_event_handler = intern ("timer-event-handler");
10783    staticpro (&Qtimer_event_handler);    staticpro (&Qtimer_event_handler);
10784    
10785    Qdisabled_command_hook = intern ("disabled-command-hook");    Qdisabled_command_function = intern ("disabled-command-function");
10786    staticpro (&Qdisabled_command_hook);    staticpro (&Qdisabled_command_function);
10787    
10788    Qself_insert_command = intern ("self-insert-command");    Qself_insert_command = intern ("self-insert-command");
10789    staticpro (&Qself_insert_command);    staticpro (&Qself_insert_command);
# Line 11280  The elements of the list are event types Line 11280  The elements of the list are event types
11280                   doc: /* Per-terminal keymap that overrides all other local keymaps.                   doc: /* Per-terminal keymap that overrides all other local keymaps.
11281  If this variable is non-nil, it is used as a keymap instead of the  If this variable is non-nil, it is used as a keymap instead of the
11282  buffer's local map, and the minor mode keymaps and text property keymaps.  buffer's local map, and the minor mode keymaps and text property keymaps.
11283    It also overrides `overriding-local-map'.
11284  This variable is intended to let commands such as `universal-argument'  This variable is intended to let commands such as `universal-argument'
11285  set up a different keymap for reading the next command.  */);  set up a different keymap for reading the next command.  */);
11286    

Legend:
Removed from v.1.681.2.19  
changed lines
  Added in v.1.681.2.20

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26