Mercurial > hg > xemacs-beta

diff src/glyphs-x.c @ 639:4b7d425dd3c2
[xemacs-hg @ 2001-07-28 05:08:58 by andyp] Stop flickering on OpenMotif.
author: andyp
date: Sat, 28 Jul 2001 05:09:03 +0000
parents: 4d7fdf497470
children: b39c14581166
--- a/src/glyphs-x.c	Thu Jul 26 21:10:48 2001 +0000
+++ b/src/glyphs-x.c	Sat Jul 28 05:09:03 2001 +0000
@@ -80,6 +80,7 @@
 
 #ifdef LWLIB_WIDGETS_MOTIF
 #include <Xm/Xm.h>
+#include <Xm/Scale.h>
 #endif
 #include <X11/IntrinsicP.h>
 
@@ -2667,18 +2668,18 @@
 static void
 x_progress_gauge_redisplay (Lisp_Object image_instance)
 {
-  Lisp_Image_Instance *ii = XIMAGE_INSTANCE (image_instance);
-
-  if (IMAGE_INSTANCE_WIDGET_ITEMS_CHANGED (ii))
+  Lisp_Image_Instance *p = XIMAGE_INSTANCE (image_instance);
+
+  if (IMAGE_INSTANCE_WIDGET_ITEMS_CHANGED (p))
     {
       Arg al [1];
       Lisp_Object val;
 #ifdef ERROR_CHECK_GLYPHS
-      assert (GUI_ITEMP (IMAGE_INSTANCE_WIDGET_PENDING_ITEMS (ii)));
+      assert (GUI_ITEMP (IMAGE_INSTANCE_WIDGET_PENDING_ITEMS (p)));
 #endif
-      val = XGUI_ITEM (IMAGE_INSTANCE_WIDGET_PENDING_ITEMS (ii))->value;
+      val = XGUI_ITEM (IMAGE_INSTANCE_WIDGET_PENDING_ITEMS (p))->value;
       XtSetArg (al[0], XtNvalue, XINT (val));
-      XtSetValues (IMAGE_INSTANCE_X_WIDGET_ID (ii), al, 1);
+      XtSetValues (IMAGE_INSTANCE_X_WIDGET_ID (p), al, 1);
     }
 }