--- a/NewLauncher.st	Wed Dec 29 16:53:41 1999 +0100
+++ b/NewLauncher.st	Thu Dec 30 11:17:01 1999 +0100
@@ -2629,6 +2629,14 @@
         self startClock
     ].
 
+    "/ change my minimum height ...
+    self window minExtent:(self window minExtent x
+                           @
+                           (self window minExtent y
+                            "/ + (builder componentAt:'infoBarSubSpec') height
+                            - 12
+                           )
+                          ).
 !
 
 reOpen
@@ -2906,5 +2914,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.163 1999-12-29 10:40:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.164 1999-12-30 10:17:01 cg Exp $'
 ! !