CheckBox.st
changeset 246 dea18e6f07d2
parent 223 4744780ae88d
child 268 978db6396b49
--- a/CheckBox.st	Wed Sep 11 12:51:59 1996 +0200
+++ b/CheckBox.st	Wed Sep 11 16:54:00 1996 +0200
@@ -582,7 +582,7 @@
     ].
     labelView forceResize.
     labelView adjust:#left.
-    self height:labelView preferredExtent y + ViewSpacing.
+    self initialHeight:labelView preferredExtent y + ViewSpacing.
 
     "/ actions in the label are handled by my controller
     labelView setController:controller.
@@ -604,6 +604,13 @@
     "Modified: 18.7.1996 / 12:05:10 / cg"
 ! !
 
+!CheckBox ignoredMethodsFor:'new methods'!
+
+extent:newExtent
+    self halt.
+    super extent:newExtent.
+! !
+
 !CheckBox methodsFor:'private'!
 
 sendChangeMessageWith:aValue
@@ -642,5 +649,5 @@
 !CheckBox  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.32 1996-07-19 19:12:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.33 1996-09-11 14:54:00 dq Exp $'
 ! !