X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fevent-msw.c;h=f098d730b82de3df153905d3b593479a2428357a;hb=8a94199825cb42ddf06e418e0b26395c836ff5de;hp=2dfb2fef5fd5eeaf1b10d2a5347a58814b50185d;hpb=59eec5f21669e81977b5b1fe9bf717cab49cf7fb;p=chise%2Fxemacs-chise.git- diff --git a/src/event-msw.c b/src/event-msw.c index 2dfb2fe..f098d73 100644 --- a/src/event-msw.c +++ b/src/event-msw.c @@ -146,13 +146,13 @@ int mswindows_quit_chars_count = 0; /* These are Lisp integers; see DEFVARS in this file for description. */ int mswindows_dynamic_frame_resize; int mswindows_alt_by_itself_activates_menu; -int mswindows_num_mouse_buttons; -int mswindows_mouse_button_max_skew_x; -int mswindows_mouse_button_max_skew_y; -int mswindows_mouse_button_tolerance; +Fixnum mswindows_num_mouse_buttons; +Fixnum mswindows_mouse_button_max_skew_x; +Fixnum mswindows_mouse_button_max_skew_y; +Fixnum mswindows_mouse_button_tolerance; #ifdef DEBUG_XEMACS -int debug_mswindows_events; +Fixnum debug_mswindows_events; #endif /* This is the event signaled by the event pump. @@ -1276,6 +1276,8 @@ mswindows_drain_windows_queue (void) { char class_name_buf [sizeof (XEMACS_CLASS) + 2] = ""; + /* Don't translate messages destined for a dialog box, this + makes keyboard traversal work. I think?? */ if (mswindows_is_dialog_msg (&msg)) { mswindows_unmodalize_signal_maybe (); @@ -3632,12 +3634,12 @@ vars_of_event_mswindows (void) mswindows_u_dispatch_event_queue = Qnil; staticpro (&mswindows_u_dispatch_event_queue); mswindows_u_dispatch_event_queue_tail = Qnil; - pdump_wire (&mswindows_u_dispatch_event_queue_tail); + dump_add_root_object (&mswindows_u_dispatch_event_queue_tail); mswindows_s_dispatch_event_queue = Qnil; staticpro (&mswindows_s_dispatch_event_queue); mswindows_s_dispatch_event_queue_tail = Qnil; - pdump_wire (&mswindows_s_dispatch_event_queue_tail); + dump_add_root_object (&mswindows_s_dispatch_event_queue_tail); mswindows_error_caught_in_modal_loop = Qnil; staticpro (&mswindows_error_caught_in_modal_loop);