/[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.801 by monnier, Sat Dec 11 23:43:21 2004 UTC revision 1.802 by kfstorm, Wed Dec 15 00:04:39 2004 UTC
# Line 3580  event_to_kboard (event) Line 3580  event_to_kboard (event)
3580  }  }
3581  #endif  #endif
3582    
3583    
3584    Lisp_Object Vthrow_on_input;
3585    
3586  /* Store an event obtained at interrupt level into kbd_buffer, fifo */  /* Store an event obtained at interrupt level into kbd_buffer, fifo */
3587    
3588  void  void
# Line 3705  kbd_buffer_store_event_hold (event, hold Line 3708  kbd_buffer_store_event_hold (event, hold
3708        *kbd_store_ptr = *event;        *kbd_store_ptr = *event;
3709        ++kbd_store_ptr;        ++kbd_store_ptr;
3710      }      }
3711    
3712      /* If we're in a section that requested to be interrupted as soon
3713         as input comes, then set quit-flag to cause an interrupt.  */
3714      if (!NILP (Vthrow_on_input)
3715          && event->kind != FOCUS_IN_EVENT
3716          && event->kind != HELP_EVENT
3717          && event->kind != DEICONIFY_EVENT)
3718        Vquit_flag = Vthrow_on_input;
3719  }  }
3720    
3721    
# Line 11377  Used during Emacs' startup.  */); Line 11388  Used during Emacs' startup.  */);
11388                 doc: /* *How long to display an echo-area message when the minibuffer is active.                 doc: /* *How long to display an echo-area message when the minibuffer is active.
11389  If the value is not a number, such messages don't time out.  */);  If the value is not a number, such messages don't time out.  */);
11390    Vminibuffer_message_timeout = make_number (2);    Vminibuffer_message_timeout = make_number (2);
11391    
11392      DEFVAR_LISP ("throw-on-input", &Vthrow_on_input,
11393                   doc: /* If non-nil, any keyboard input throws to this symbol.
11394    The value of that variable is passed to `quit-flag' and later causes a
11395    peculiar kind of quitting.  */);
11396      Vthrow_on_input = Qnil;
11397  }  }
11398    
11399  void  void

Legend:
Removed from v.1.801  
changed lines
  Added in v.1.802

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