--- a/DialogBox.st	Fri Jun 28 10:52:25 2013 +0200
+++ b/DialogBox.st	Thu Jul 04 13:56:11 2013 +0200
@@ -7649,6 +7649,7 @@
     ].
     preferredExtent := nil.
     needResize := true.
+    shown ifTrue:[ aButton realize ].
     ^ aButton
 
     "
@@ -9922,11 +9923,11 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.338 2013-06-27 12:14:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.339 2013-07-04 11:56:11 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.338 2013-06-27 12:14:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.339 2013-07-04 11:56:11 cg Exp $'
 ! !