#REFACTORING by exept
authorClaus Gittinger <cg@exept.de>
Thu, 31 Oct 2019 09:04:07 +0100
changeset 6728 c098736d4ecc
parent 6727 7297280b7c28
child 6729 53d2345cf12a
#REFACTORING by exept class: OptionBox changed: #initialize
OptionBox.st
--- a/OptionBox.st	Wed Oct 30 21:34:53 2019 +0100
+++ b/OptionBox.st	Thu Oct 31 09:04:07 2019 +0100
@@ -658,12 +658,10 @@
     vPanelLayout bottomOffset:(gc font height + (mm * 5)) negated.
     vPanelLayout rightOffset:mm negated.
     verticalPanel geometryLayout:vPanelLayout.
-    verticalPanel horizontalLayout:#fit.
-    verticalPanel verticalLayout:#bottomFit.
+    verticalPanel horizontalLayout:#fit verticalLayout:#bottomFit.
 
     labelPanel := HorizontalPanelView in:verticalPanel.
-    labelPanel horizontalLayout:#leftSpace.
-    labelPanel verticalLayout:#topSpace.
+    labelPanel horizontalLayout:#leftSpace verticalLayout:#topSpace.
     labelPanel height:(labelPanel preferredHeight + (mm * 4)).
 
     formLabel := Label in:labelPanel.