--- a/NewLauncher.st	Thu Nov 16 14:15:51 2006 +0100
+++ b/NewLauncher.st	Thu Nov 16 14:22:39 2006 +0100
@@ -3950,11 +3950,11 @@
             + aBuilder menuBar preferredExtent y
             + (aBuilder componentAt:#infoBarSubSpec) height
             + (aBuilder componentAt:#menuToolbarView) preferredExtent y
-            + 8.
+            -3 "+ 8".   "/ I guess this is menuToolbar level abs + textCollector level abs...
 
     win minExtent:( win minExtent x @ hMin ).
 
-    "Modified: / 16-11-2006 / 12:42:18 / cg"
+    "Modified: / 16-11-2006 / 14:23:17 / cg"
 !
 
 postOpenWith:aBuilder
@@ -4006,15 +4006,7 @@
         self startClock
     ].
 
-    window := self window.
-    "/ change my minimum height ...
-    window minExtent:(window minExtent x
-                      @
-                     (window minExtent y
-                      "/ + (builder componentAt:'infoBarSubSpec') height
-                      - 12
-                     )
-                    ).
+    "Modified: / 16-11-2006 / 12:50:21 / cg"
 !
 
 requestForWindowClose
@@ -4344,5 +4336,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.350 2006-11-16 11:41:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.351 2006-11-16 13:22:39 cg Exp $'
 ! !