--- a/OptionBox.st	Mon Jul 27 16:18:21 1998 +0200
+++ b/OptionBox.st	Mon Jul 27 19:37:49 1998 +0200
@@ -320,7 +320,9 @@
     textLabel borderWidth:0.
     textLabel origin:((mm + formLabel width + mm) @ mm).
 
-    buttonPanel := HorizontalPanelView origin:(0.0 @ 1.0) corner:(1.0 @ 1.0) in:self.
+"/    buttonPanel isNil ifTrue:[
+"/        buttonPanel := HorizontalPanelView origin:(0.0 @ 1.0) corner:(1.0 @ 1.0) in:self.
+"/    ].
     buttonPanel 
         bottomInset:mm;
         topInset:(font height + mm * 2) negated.
@@ -358,7 +360,7 @@
      box open
     "
 
-    "Modified: 21.2.1996 / 01:03:19 / cg"
+    "Modified: / 27.7.1998 / 19:37:17 / cg"
 ! !
 
 !OptionBox methodsFor:'queries'!
@@ -398,5 +400,5 @@
 !OptionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.39 1997-01-16 21:01:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.40 1998-07-27 17:37:49 cg Exp $'
 ! !