equal
deleted
inserted
replaced
72 className:something |
72 className:something |
73 "set the class which provides the resources |
73 "set the class which provides the resources |
74 " |
74 " |
75 className := something. |
75 className := something. |
76 resourceOwner := nil. |
76 resourceOwner := nil. |
|
77 ! |
|
78 |
|
79 labelText |
|
80 ^ labelText |
|
81 ! |
|
82 |
|
83 labelText:aText |
|
84 labelText := aText |
77 ! |
85 ! |
78 |
86 |
79 selector |
87 selector |
80 "return the value of the instance variable 'selector' (automatically generated)" |
88 "return the value of the instance variable 'selector' (automatically generated)" |
81 |
89 |