--- a/TopView.st Fri Jul 19 20:50:23 1996 +0200
+++ b/TopView.st Fri Jul 19 20:54:29 1996 +0200
@@ -251,12 +251,14 @@
however many subclasses redefine this to compute the actual value
depending on the sizes of the contents or subcomponents."
+ "/ If I have an explicit preferredExtent ..
+
preferredExtent notNil ifTrue:[
^ preferredExtent
].
^ self class defaultExtent
- "Modified: 29.5.1996 / 12:10:32 / cg"
+ "Modified: 19.7.1996 / 20:45:41 / cg"
!
type
@@ -450,5 +452,5 @@
!TopView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.31 1996-07-18 17:26:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.32 1996-07-19 18:54:29 cg Exp $'
! !