/[emacs]/emacs/lwlib/lwlib-Xaw.c
ViewVC logotype

Diff of /emacs/lwlib/lwlib-Xaw.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.17 by pj, Wed Jan 9 10:59:54 2002 UTC revision 1.18 by pj, Sun Jan 27 18:18:38 2002 UTC
# Line 53  lw_xaw_widget_p (widget) Line 53  lw_xaw_widget_p (widget)
53            XtIsSubclass (widget, dialogWidgetClass));            XtIsSubclass (widget, dialogWidgetClass));
54  }  }
55    
56    #if 0
57  static void  static void
58  xaw_update_scrollbar (instance, widget, val)  xaw_update_scrollbar (instance, widget, val)
59       widget_instance *instance;       widget_instance *instance;
60       Widget widget;       Widget widget;
61       widget_value *val;       widget_value *val;
62  {  {
 #if 0  
63    if (val->scrollbar_data)    if (val->scrollbar_data)
64      {      {
65        scrollbar_values *data = val->scrollbar_data;        scrollbar_values *data = val->scrollbar_data;
# Line 115  xaw_update_scrollbar (instance, widget, Line 115  xaw_update_scrollbar (instance, widget,
115        if (new_shown != widget_shown || new_topOfThumb != widget_topOfThumb)        if (new_shown != widget_shown || new_topOfThumb != widget_topOfThumb)
116          XawScrollbarSetThumb (widget, new_topOfThumb, new_shown);          XawScrollbarSetThumb (widget, new_topOfThumb, new_shown);
117      }      }
 #endif  
118  }  }
119    #endif
120    
121  void  void
122  xaw_update_one_widget (instance, widget, val, deep_p)  xaw_update_one_widget (instance, widget, val, deep_p)
# Line 540  wm_delete_window (shell, closure, call_d Line 540  wm_delete_window (shell, closure, call_d
540    
541  /* Scrollbars */  /* Scrollbars */
542    
543    #if 0
544  static void  static void
545  xaw_scrollbar_scroll (widget, closure, call_data)  xaw_scrollbar_scroll (widget, closure, call_data)
546       Widget widget;       Widget widget;
547       XtPointer closure;       XtPointer closure;
548       XtPointer call_data;       XtPointer call_data;
549  {  {
 #if 0  
550    widget_instance *instance = (widget_instance *) closure;    widget_instance *instance = (widget_instance *) closure;
551    LWLIB_ID id;    LWLIB_ID id;
552    scroll_event event_data;    scroll_event event_data;
# Line 565  xaw_scrollbar_scroll (widget, closure, c Line 565  xaw_scrollbar_scroll (widget, closure, c
565    
566    if (instance->info->pre_activate_cb)    if (instance->info->pre_activate_cb)
567      instance->info->pre_activate_cb (widget, id, (XtPointer) &event_data);      instance->info->pre_activate_cb (widget, id, (XtPointer) &event_data);
 #endif  
568  }  }
569    #endif
570    
571    #if 0
572  static void  static void
573  xaw_scrollbar_jump (widget, closure, call_data)  xaw_scrollbar_jump (widget, closure, call_data)
574       Widget widget;       Widget widget;
575       XtPointer closure;       XtPointer closure;
576       XtPointer call_data;       XtPointer call_data;
577  {  {
 #if 0  
578    widget_instance *instance = (widget_instance *) closure;    widget_instance *instance = (widget_instance *) closure;
579    LWLIB_ID id;    LWLIB_ID id;
580    scroll_event event_data;    scroll_event event_data;
# Line 596  xaw_scrollbar_jump (widget, closure, cal Line 596  xaw_scrollbar_jump (widget, closure, cal
596    
597    if (instance->info->pre_activate_cb)    if (instance->info->pre_activate_cb)
598      instance->info->pre_activate_cb (widget, id, (XtPointer) &event_data);      instance->info->pre_activate_cb (widget, id, (XtPointer) &event_data);
 #endif  
599  }  }
600    #endif
601    
602  static Widget  static Widget
603  xaw_create_scrollbar (instance)  xaw_create_scrollbar (instance)

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18

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