added preferredWidth & preferredHeight
authorClaus Gittinger <cg@exept.de>
Fri, 30 May 2008 14:25:38 +0200
changeset 3424 013c4629ec6e
parent 3423 5870494fda6b
child 3425 20459e327062
added preferredWidth & preferredHeight
CheckBox.st
--- a/CheckBox.st	Fri May 30 14:25:22 2008 +0200
+++ b/CheckBox.st	Fri May 30 14:25:38 2008 +0200
@@ -797,7 +797,7 @@
     ].
     labelView forceResize.
     labelView adjust:#left.
-    self initialHeight:labelView preferredExtent y + ViewSpacing.
+    self initialHeight:labelView preferredHeight + ViewSpacing.
 
     CheckToggleLeft == false ifTrue:[
         "/ toggle last ...
@@ -927,5 +927,5 @@
 !CheckBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.77 2008-01-17 09:59:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.78 2008-05-30 12:25:38 cg Exp $'
 ! !