TopView.st
changeset 966 8e202c385338
parent 960 b9bd0a5c4884
child 1160 5eb12a5b8100
--- 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 $'
 ! !