OptionBox.st
changeset 3743 64ed47a0e1d7
parent 3733 1ff480685a0b
child 3757 551f24a728dc
--- a/OptionBox.st	Wed Oct 22 11:24:17 2008 +0200
+++ b/OptionBox.st	Fri Oct 24 15:14:37 2008 +0200
@@ -442,6 +442,20 @@
 
 !OptionBox methodsFor:'accessing-components'!
 
+addCheckBox:label on:aValueHolder
+    |box|
+
+    box := super addCheckBox:label on:aValueHolder.
+
+    box layout:((0.0 @ 1.0 corner:1.0 @ 1.0) asLayout 
+                topOffset:(buttonPanel preferredHeight 
+                          + box preferredHeight
+                          + ViewSpacing ) negated;
+                bottomOffset:(buttonPanel preferredHeight 
+                          + ViewSpacing ) negated).
+    ^ box.
+!
+
 buttons
     "return the buttons collection"
 
@@ -659,5 +673,5 @@
 !OptionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.65 2008-10-16 15:51:00 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.66 2008-10-24 13:14:37 cg Exp $'
 ! !