--- a/Scroller.st	Fri Oct 30 09:44:42 2009 +0100
+++ b/Scroller.st	Fri Oct 30 10:58:52 2009 +0100
@@ -1138,6 +1138,7 @@
         lvl := thumbActiveLevel
     ].
 
+    thumbFrame isNil ifTrue:[^ self].
     w := thumbFrame width.
     h := thumbFrame height.
     l := thumbFrame left.
@@ -2751,9 +2752,9 @@
 !Scroller class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.197 2009-10-24 23:20:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.198 2009-10-30 09:58:52 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.197 2009-10-24 23:20:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.198 2009-10-30 09:58:52 cg Exp $'
 ! !