summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKim F. Storm <storm@cua.dk>2006-12-19 15:37:20 +0000
committerKim F. Storm <storm@cua.dk>2006-12-19 15:37:20 +0000
commitb809d9e75e1f8456d04daa305d8a1ea710ac1b2a (patch)
treef481cb9d12a39a7699725b1643902b418133c07a
parent71b28d05887e2daf706a63c9d34891615de5f3df (diff)
downloademacs-b809d9e75e1f8456d04daa305d8a1ea710ac1b2a.tar.gz
(kbd_buffer_store_event_hold): Undo 2006-12-04 change.
(make_lispy_event): Don't generate Qsignal prefix for code 0. Abort if signal code is unknown. (store_user_signal_events): Don't make Qsignal prefix (code 0). (Qsignal): Move declaration back to process.c. (syms_of_keyboard): Don't intern or staticpro it here.
-rw-r--r--src/keyboard.c28
1 files changed, 7 insertions, 21 deletions
diff --git a/src/keyboard.c b/src/keyboard.c
index b2d84dfba32..6e99af67cd9 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -3799,8 +3799,7 @@ kbd_buffer_store_event_hold (event, hold_quit)
if (!NILP (Vthrow_on_input)
&& event->kind != FOCUS_IN_EVENT
&& event->kind != HELP_EVENT
- && event->kind != DEICONIFY_EVENT
- && !(event->kind == USER_SIGNAL_EVENT && event->code == 0))
+ && event->kind != DEICONIFY_EVENT)
{
Vquit_flag = Vthrow_on_input;
/* If we're inside a function that wants immediate quits,
@@ -5088,9 +5087,6 @@ Lisp_Object *scroll_bar_parts[] = {
&Qup, &Qdown, &Qtop, &Qbottom, &Qend_scroll, &Qratio
};
-/* User signal events. */
-Lisp_Object Qsignal;
-
/* A vector, indexed by button number, giving the down-going location
of currently depressed buttons, both scroll bar and non-scroll bar.
@@ -5969,17 +5965,12 @@ make_lispy_event (event)
case USER_SIGNAL_EVENT:
/* A user signal. */
- if (event->code == 0)
- return Qsignal;
- else
- {
- char *name = find_user_signal_name (event->code);
-
- if (name)
- return intern (name);
- else
- return make_number (event->code);
- }
+ {
+ char *name = find_user_signal_name (event->code);
+ if (!name)
+ abort ();
+ return intern (name);
+ }
case SAVE_SESSION_EVENT:
return Qsave_session;
@@ -7156,8 +7147,6 @@ store_user_signal_events ()
mask = sigblock (sigmask (p->sig));
do
{
- buf.code = 0;
- kbd_buffer_store_event (&buf);
buf.code = p->sig;
kbd_buffer_store_event (&buf);
p->npending--;
@@ -11183,9 +11172,6 @@ syms_of_keyboard ()
staticpro (&Qmac_apple_event);
#endif
- Qsignal = intern ("signal");
- staticpro (&Qsignal);
-
Qmenu_enable = intern ("menu-enable");
staticpro (&Qmenu_enable);
Qmenu_alias = intern ("menu-alias");