--- a/ScrollBar.st	Tue Sep 14 18:14:38 2004 +0200
+++ b/ScrollBar.st	Tue Sep 14 19:01:16 2004 +0200
@@ -719,19 +719,22 @@
 pageDown
     "page down/right"
 
-    thumb pageDown
+    thumb pageDown.
+    self updateNativeWidget.
 !
 
 pageUp
     "page up/left"
 
-    thumb pageUp
+    thumb pageUp.
+    self updateNativeWidget.
 !
 
 scrollToBeginning
     "to top"
 
-    thumb scrollToBeginning
+    thumb scrollToBeginning.
+    self updateNativeWidget.
 
     "Modified: 6.3.1996 / 17:54:45 / cg"
 !
@@ -739,7 +742,8 @@
 scrollToEnd
     "to end"
 
-    thumb scrollToEnd
+    thumb scrollToEnd.
+    self updateNativeWidget.
 
     "Created: 6.3.1996 / 17:54:28 / cg"
     "Modified: 6.3.1996 / 17:54:49 / cg"
@@ -1169,5 +1173,5 @@
 !ScrollBar class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.80 2004-09-14 16:14:38 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.81 2004-09-14 17:01:16 ca Exp $'
 ! !