(xaw_scroll_callback): Cast correctly.

diff --git a/src/ChangeLog b/src/ChangeLog
index 522c49d1dc8e97d3d1b67e2a4ab92d3991ed425f..8f53479bafcaac679e097473430808b6388cd05f 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2002-10-29  Dave Love  <fx@gnu.org>
+
+       * xterm.c (xaw_scroll_callback): Cast correctly.
+
 2002-10-28  Dave Love  <fx@gnu.org>
 
        * keyboard.c (lispy_accent_codes, lispy_accent_keys): Extend.

diff --git a/src/xterm.c b/src/xterm.c
index 7c57c91b843a6c99b54fd63fa1236dda88d4fc9c..889e62c347348c326a7c1498a567772fac67aa4b 100644 (file)
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -8639,8 +8639,7 @@ xaw_scroll_callback (widget, client_data, call_data)
      XtPointer client_data, call_data;
 {
   struct scroll_bar *bar = (struct scroll_bar *) client_data;
-  /* Fixme: Check this.  */
-  long position = (long) call_data;
+  int position = *(int *) call_data;
   Dimension height;
   int part;