--- a/ModalBox.st	Fri Jul 19 19:22:08 1996 +0200
+++ b/ModalBox.st	Fri Jul 19 20:50:23 1996 +0200
@@ -433,13 +433,15 @@
      visible in myself. This should be redefined in
      subclasses."
 
+    "/ If I have an explicit preferredExtent ..
+
     preferredExtent notNil ifTrue:[
         ^ preferredExtent
     ].
 
     ^ self class defaultExtent
 
-    "Modified: 29.5.1996 / 12:11:26 / cg"
+    "Modified: 19.7.1996 / 20:45:07 / cg"
 ! !
 
 !ModalBox methodsFor:'show / hide'!
@@ -820,6 +822,6 @@
 !ModalBox  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/ModalBox.st,v 1.47 1996-07-18 17:24:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/ModalBox.st,v 1.48 1996-07-19 18:50:23 cg Exp $'
 ! !
 ModalBox initialize!