[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/keyboard.c
From: |
Luc Teirlinck |
Subject: |
[Emacs-diffs] Changes to emacs/src/keyboard.c |
Date: |
Sun, 08 Aug 2004 12:21:44 -0400 |
Index: emacs/src/keyboard.c
diff -c emacs/src/keyboard.c:1.788 emacs/src/keyboard.c:1.789
*** emacs/src/keyboard.c:1.788 Sat Aug 7 02:28:50 2004
--- emacs/src/keyboard.c Sun Aug 8 16:17:23 2004
***************
*** 131,138 ****
#endif
/* Non-nil disable property on a command means
! do not execute it; call disabled-command-hook's value instead. */
! Lisp_Object Qdisabled, Qdisabled_command_hook;
#define NUM_RECENT_KEYS (100)
int recent_keys_index; /* Index for storing next element into
recent_keys */
--- 131,138 ----
#endif
/* Non-nil disable property on a command means
! do not execute it; call disabled-command-function's value instead. */
! Lisp_Object Qdisabled, Qdisabled_command_function;
#define NUM_RECENT_KEYS (100)
int recent_keys_index; /* Index for storing next element into
recent_keys */
***************
*** 9665,9673 ****
tem = Fget (cmd, Qdisabled);
if (!NILP (tem) && !NILP (Vrun_hooks))
{
! tem = Fsymbol_value (Qdisabled_command_hook);
if (!NILP (tem))
! return call1 (Vrun_hooks, Qdisabled_command_hook);
}
}
--- 9665,9673 ----
tem = Fget (cmd, Qdisabled);
if (!NILP (tem) && !NILP (Vrun_hooks))
{
! tem = Fsymbol_value (Qdisabled_command_function);
if (!NILP (tem))
! return call1 (Vrun_hooks, Qdisabled_command_function);
}
}
***************
*** 10782,10789 ****
Qtimer_event_handler = intern ("timer-event-handler");
staticpro (&Qtimer_event_handler);
! Qdisabled_command_hook = intern ("disabled-command-hook");
! staticpro (&Qdisabled_command_hook);
Qself_insert_command = intern ("self-insert-command");
staticpro (&Qself_insert_command);
--- 10782,10789 ----
Qtimer_event_handler = intern ("timer-event-handler");
staticpro (&Qtimer_event_handler);
! Qdisabled_command_function = intern ("disabled-command-function");
! staticpro (&Qdisabled_command_function);
Qself_insert_command = intern ("self-insert-command");
staticpro (&Qself_insert_command);