--- 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 $'
! !