--- a/SubCanvas.st	Fri Jul 18 11:41:21 2008 +0200
+++ b/SubCanvas.st	Fri Jul 18 11:44:14 2008 +0200
@@ -296,7 +296,6 @@
             subSpec := subSpec decodeAsLiteralArray.
             subSpec isArray ifTrue:[self halt].
         ].
-
         builder isNil ifTrue:[
             client isNil ifTrue:[
                 builderClass := UIBuilder
@@ -348,6 +347,11 @@
             savedSuperView := clientView superView.
             savedSuperView isNil ifTrue:[clientView setContainer:self].
             client buildSubCanvas:subSpec withBuilder:builder.
+
+            subSpec class == FullSpec ifTrue:[
+                "/ mhmh - should we take the attributes from the windowSpec or from my spec ????
+                subSpec window setBackgroundColorAttributesIn:clientView with:builder.
+            ].
             savedSuperView isNil ifTrue:[
                 clientView setContainer:nil. 
                 self removeSubView:clientView.
@@ -518,5 +522,5 @@
 !SubCanvas class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SubCanvas.st,v 1.61 2008-04-23 20:59:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SubCanvas.st,v 1.62 2008-07-18 09:44:14 cg Exp $'
 ! !