--- a/SubCanvas.st	Wed Nov 22 16:35:55 2000 +0100
+++ b/SubCanvas.st	Wed Nov 22 18:00:20 2000 +0100
@@ -397,13 +397,14 @@
         spec := specHolder value
     ].
     (client notNil and:[spec notNil]) ifTrue:[
-        self client:client spec:spec
     ] ifFalse:[
 "/        spec notNil ifTrue:[
 "/            self halt:'spec but no app'.
 "/        ].
-        self client:nil
-    ]
+        client := nil.
+        spec := #windowSpec.  "/ is that true ?
+    ].
+    self client:client spec:spec builder:nil
 
     "Modified: / 5.8.1999 / 13:35:26 / cg"
 ! !
@@ -479,5 +480,5 @@
 !SubCanvas class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SubCanvas.st,v 1.29 2000-11-22 15:35:55 tm Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SubCanvas.st,v 1.30 2000-11-22 17:00:20 cg Exp $'
 ! !