--- a/SimpleView.st Tue Jan 23 17:32:26 2001 +0100
+++ b/SimpleView.st Wed Jan 24 15:09:32 2001 +0100
@@ -6625,7 +6625,7 @@
self setInnerClip.
"if view becomes smaller, send sizeChanged first"
- (how == #smaller) ifTrue:[
+ true "(how == #smaller)" ifTrue:[
self sizeChanged:how
].
@@ -6649,7 +6649,7 @@
].
"if view becomes bigger, send sizeChanged after"
- (how ~~ #smaller) ifTrue:[
+ false "(how ~~ #smaller)" ifTrue:[
self sizeChanged:how
].
@@ -9096,6 +9096,6 @@
!SimpleView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.404 2001-01-08 13:42:38 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.405 2001-01-24 14:09:32 cg Exp $'
! !
SimpleView initialize!