equal
deleted
inserted
replaced
959 "return my preferred extent - this is the minimum size I would like to have. |
959 "return my preferred extent - this is the minimum size I would like to have. |
960 The default here is the classes default extent, |
960 The default here is the classes default extent, |
961 however many subclasses redefine this to compute the actual value |
961 however many subclasses redefine this to compute the actual value |
962 depending on the sizes of the contents or subcomponents." |
962 depending on the sizes of the contents or subcomponents." |
963 |
963 |
964 "/ If I have an explicit preferredExtent .. |
964 "/ If I have an explicit preferredExtent.. |
965 |
965 explicitExtent notNil ifTrue:[ |
|
966 ^ explicitExtent |
|
967 ]. |
|
968 |
|
969 "/ If I have a cached preferredExtent value.. |
966 preferredExtent notNil ifTrue:[ |
970 preferredExtent notNil ifTrue:[ |
967 ^ preferredExtent |
971 ^ preferredExtent |
968 ]. |
972 ]. |
969 ^ self class defaultExtent |
973 ^ self class defaultExtent |
970 |
974 |
1346 ! ! |
1350 ! ! |
1347 |
1351 |
1348 !TopView class methodsFor:'documentation'! |
1352 !TopView class methodsFor:'documentation'! |
1349 |
1353 |
1350 version |
1354 version |
1351 ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.122 2008-07-12 15:23:28 cg Exp $' |
1355 ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.123 2008-10-26 20:16:01 stefan Exp $' |
1352 ! ! |
1356 ! ! |
1353 |
1357 |
1354 TopView initialize! |
1358 TopView initialize! |