--- a/ScrollBar.st	Tue Sep 14 20:06:45 2004 +0200
+++ b/ScrollBar.st	Wed Sep 15 15:02:25 2004 +0200
@@ -971,11 +971,15 @@
 
 updateNativeWidget
     self isNativeWidget ifTrue:[
-        "/ self halt.
         drawableId notNil ifTrue:[
             device 
+                setScrollRange:0 to:100 
+                redraw:false 
+                in:drawableId.
+
+            device 
                 setScrollPosition:thumb thumbOrigin rounded 
-                redraw:true 
+                redraw:false 
                 in:drawableId.
 
             device 
@@ -1173,5 +1177,5 @@
 !ScrollBar class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.81 2004-09-14 17:01:16 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.82 2004-09-15 13:02:25 ca Exp $'
 ! !