--- a/TerminalApplication.st	Wed Oct 22 16:45:20 2003 +0200
+++ b/TerminalApplication.st	Wed Oct 22 16:48:51 2003 +0200
@@ -424,6 +424,16 @@
 
 !TerminalApplication methodsFor:'startup'!
 
+postBuildWith:aBuilder
+    |w h|
+
+    super postBuildWith:aBuilder.
+
+    w := self window width max:(workspaces first preferredExtent x).
+    h := builder menuBar height + (workspaces first preferredExtent y).
+    self window extent:(w@h).
+!
+
 postOpenWith:aBuilder
     self startShellInSelectedWindow.
     super postOpenWith:aBuilder
@@ -448,5 +458,5 @@
 !TerminalApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.2 2003-10-22 14:43:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.3 2003-10-22 14:48:51 cg Exp $'
 ! !