--- a/DialogBox.st	Mon Sep 21 23:07:48 2009 +0200
+++ b/DialogBox.st	Tue Sep 22 19:03:17 2009 +0200
@@ -8543,6 +8543,10 @@
     ].
     addedComponents add:aComponent.
     self addSubView:aComponent.
+
+    "/ must flush any cached preferredExtent, when a component is added (for example, in an aboutToOpen callBack)
+    needResize := true.
+    preferredExtent := nil.
 !
 
 hideAndEvaluate:aBlock
@@ -8861,7 +8865,7 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.286 2009-09-07 09:34:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.287 2009-09-22 17:03:17 cg Exp $'
 ! !
 
 DialogBox initialize!