--- a/CheckBox.st Sun Jan 05 01:22:04 1997 +0100
+++ b/CheckBox.st Thu Jan 09 12:52:16 1997 +0100
@@ -19,7 +19,7 @@
category:'Views-Interactors'
!
-!CheckBox class methodsFor:'documentation'!
+!CheckBox class methodsFor:'documentation'!
copyright
"
@@ -246,7 +246,7 @@
"
! !
-!CheckBox class methodsFor:'instance creation'!
+!CheckBox class methodsFor:'instance creation'!
label:aStringOrImage model:aModel
"create & return a new checkBox, on aModel (typically a ValueHolder),
@@ -263,7 +263,7 @@
^ self new model:aModel
! !
-!CheckBox class methodsFor:'defaults'!
+!CheckBox class methodsFor:'defaults'!
updateStyleCache
"extract values from the styleSheet and cache them in class variables"
@@ -567,6 +567,8 @@
!
initialize
+ <resource: #style (#name)>
+
super initialize.
borderWidth := 0.
@@ -578,7 +580,7 @@
labelView := Label in:self.
styleSheet name ~~ #motif ifTrue:[
- labelView label:'check'; borderWidth:0.
+ labelView label:'check'; borderWidth:0.
].
labelView forceResize.
labelView adjust:#left.
@@ -601,7 +603,7 @@
b open
"
- "Modified: 18.7.1996 / 12:05:10 / cg"
+ "Modified: 9.1.1997 / 10:56:50 / cg"
! !
!CheckBox methodsFor:'private'!
@@ -639,8 +641,8 @@
"Modified: 19.7.1996 / 20:43:47 / cg"
! !
-!CheckBox class methodsFor:'documentation'!
+!CheckBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.34 1996-12-16 22:11:54 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.35 1997-01-09 11:52:16 cg Exp $'
! !