--- a/WorkspaceApplication.st	Thu Mar 01 21:04:32 2007 +0100
+++ b/WorkspaceApplication.st	Thu Mar 01 21:28:28 2007 +0100
@@ -689,6 +689,9 @@
 
     wsApp := self new.
     wsApp allButOpen.
+
+    (wsApp builder componentAt:'NoteBook') destroyTabAction:nil.
+
     wsApp window extent:640@400.
 
     path := (Smalltalk getSystemFileName:'README') ?  '../../README'.
@@ -769,7 +772,7 @@
      self openSystemWorkspace
     "
 
-    "Modified: / 26-01-2007 / 15:20:36 / cg"
+    "Modified: / 01-03-2007 / 21:28:11 / cg"
 !
 
 openWith:initialText
@@ -1642,5 +1645,5 @@
 !WorkspaceApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.127 2007-02-21 15:01:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.128 2007-03-01 20:28:28 cg Exp $'
 ! !