--- a/ListSelectionBox.st	Mon Apr 22 19:39:18 1996 +0200
+++ b/ListSelectionBox.st	Mon Apr 22 23:42:27 1996 +0200
@@ -102,7 +102,13 @@
 !ListSelectionBox class methodsFor:'defaults'!
 
 defaultExtent
+    "return the default extent of my instances.
+     The value returned here is usually ignored, and
+     the value from preferredExtent taken instead."
+
     ^ (Display pixelPerMillimeter * (80 @ 100)) rounded
+
+    "Modified: 22.4.1996 / 23:36:49 / cg"
 !
 
 listViewType
@@ -302,5 +308,5 @@
 !ListSelectionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.25 1996-02-27 00:12:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListSelectionBox.st,v 1.26 1996-04-22 21:41:46 cg Exp $'
 ! !