--- a/ScrollBar.st	Sun Oct 26 21:12:24 2008 +0100
+++ b/ScrollBar.st	Sun Oct 26 21:12:40 2008 +0100
@@ -1116,8 +1116,12 @@
      width1    "{ Class: SmallInteger }"
      width2    "{ Class: SmallInteger }" |
 
-    "/ If I have an explicit preferredExtent ..
+    "/ If I have an explicit preferredExtent..
+    explicitExtent notNil ifTrue:[
+        ^ explicitExtent
+    ].
 
+    "/ If I have a cached preferredExtent value..
     preferredExtent notNil ifTrue:[
         ^ preferredExtent
     ].
@@ -1178,5 +1182,5 @@
 !ScrollBar class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.84 2008-07-18 09:43:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.85 2008-10-26 20:12:40 stefan Exp $'
 ! !