SubCanvas.st
changeset 1913 644ab52bfbc8
parent 1912 dc3652682529
child 1914 943f0551bf62
--- a/SubCanvas.st	Mon Jan 08 11:21:26 2001 +0100
+++ b/SubCanvas.st	Mon Jan 08 12:04:40 2001 +0100
@@ -378,9 +378,9 @@
             "/ postBuildAsSubCanvas to be invoked (instead of postBuild)
             "/ however, must unset the superView for code below ...
             savedSuperView := clientView superView.
-            clientView superView:self.
+            clientView container:self.
             client buildSubCanvas:subSpec withBuilder:builder.
-            clientView superView:savedSuperView.
+            clientView container:savedSuperView.
 
             keepClientView ifFalse:[    
                 (scrolledView notNil and:[clientView isComponentOf:scrolledView]) ifTrue:[
@@ -545,5 +545,5 @@
 !SubCanvas class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SubCanvas.st,v 1.37 2001-01-08 10:21:26 martin Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SubCanvas.st,v 1.38 2001-01-08 11:04:40 cg Exp $'
 ! !