--- tcl/start.tcl.orig	2011-04-15 20:09:37.000000000 +1000
+++ tcl/start.tcl	2011-04-15 20:10:06.000000000 +1000
@@ -468,6 +468,10 @@
   }
 }
 
+# hack to make main docked widget a reasonable size when run for the first time
+set winWidth_docked(.) 800
+set winHeight_docked(.) 600
+
 # Default stats window lines:
 array set ::windows::stats::display {
   r2600 1