changeset 1039 | 28ff56306e31 |
parent 993 | 51cce445b5d5 |
child 1089 | abb0c3d4b5f4 |
1038:c6d8eb89d260 | 1039:28ff56306e31 |
---|---|
1150 ] |
1150 ] |
1151 ! |
1151 ! |
1152 |
1152 |
1153 model:aModel |
1153 model:aModel |
1154 super model:aModel. |
1154 super model:aModel. |
1155 self getLabelFromModel. |
1155 labelMsg notNil ifTrue:[ |
1156 self getLabelFromModel. |
|
1157 ] |
|
1156 ! ! |
1158 ! ! |
1157 |
1159 |
1158 !Label methodsFor:'change & update'! |
1160 !Label methodsFor:'change & update'! |
1159 |
1161 |
1160 backgroundChannelChanged |
1162 backgroundChannelChanged |
1636 ! ! |
1638 ! ! |
1637 |
1639 |
1638 !Label class methodsFor:'documentation'! |
1640 !Label class methodsFor:'documentation'! |
1639 |
1641 |
1640 version |
1642 version |
1641 ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.73 1997-02-08 14:23:29 cg Exp $' |
1643 ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.74 1997-02-24 20:10:55 ca Exp $' |
1642 ! ! |
1644 ! ! |