comparison src/event-stream.c @ 516:8a4db099aa97

[xemacs-hg @ 2001-05-07 14:55:13 by yoshiki] zhaoway's patch "compile --without-scrollbars", <871yqlimt4.fsf@debian.org>
author yoshiki
date Mon, 07 May 2001 14:55:14 +0000
parents 7039e6323819
children c69610198c35
comparison
equal deleted inserted replaced
515:768853052061 516:8a4db099aa97
3760 } 3760 }
3761 3761
3762 static int 3762 static int
3763 is_scrollbar_event (Lisp_Object event) 3763 is_scrollbar_event (Lisp_Object event)
3764 { 3764 {
3765 #ifdef HAVE_SCROLLBARS
3765 Lisp_Object fun; 3766 Lisp_Object fun;
3766 3767
3767 if (XEVENT (event)->event_type != misc_user_event) 3768 if (XEVENT (event)->event_type != misc_user_event)
3768 return 0; 3769 return 0;
3769 fun = XEVENT (event)->event.misc.function; 3770 fun = XEVENT (event)->event.misc.function;
3780 EQ (fun, Qscrollbar_page_left) || 3781 EQ (fun, Qscrollbar_page_left) ||
3781 EQ (fun, Qscrollbar_page_right) || 3782 EQ (fun, Qscrollbar_page_right) ||
3782 EQ (fun, Qscrollbar_to_left) || 3783 EQ (fun, Qscrollbar_to_left) ||
3783 EQ (fun, Qscrollbar_to_right) || 3784 EQ (fun, Qscrollbar_to_right) ||
3784 EQ (fun, Qscrollbar_horizontal_drag)); 3785 EQ (fun, Qscrollbar_horizontal_drag));
3786 #else
3787 return 0;
3788 #endif /* HAVE_SCROLLBARS */
3785 } 3789 }
3786 3790
3787 static void 3791 static void
3788 execute_command_event (struct command_builder *command_builder, 3792 execute_command_event (struct command_builder *command_builder,
3789 Lisp_Object event) 3793 Lisp_Object event)