]> git.eshelyaron.com Git - emacs.git/commitdiff
(kbd_buffer_store_event_hold): Undo 2006-12-04 change.
authorKim F. Storm <storm@cua.dk>
Tue, 19 Dec 2006 15:37:20 +0000 (15:37 +0000)
committerKim F. Storm <storm@cua.dk>
Tue, 19 Dec 2006 15:37:20 +0000 (15:37 +0000)
(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.

src/keyboard.c

index b2d84dfba32ff70595a477df7e3d423926ebfed0..6e99af67cd9995f3d8976d10e7ad511f85ff0af9 100644 (file)
@@ -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");