diff -r 6fdcf778c5ab -r 3421f548e14a UISpecificationTool.st
--- a/UISpecificationTool.st	Fri May 30 14:36:10 2008 +0200
+++ b/UISpecificationTool.st	Fri May 30 14:36:23 2008 +0200
@@ -430,7 +430,7 @@
                 ]
             ].
             y isNil ifTrue:[
-                y := scrolledView preferredExtent y
+                y := scrolledView preferredHeight
             ].
             scrolledView origin:0@0 corner:1.0 @ y.
             scrolledView allViewBackground:(self viewBackground).