access methods for labelText edited
authorca
Thu, 03 Jul 1997 09:09:40 +0200
changeset 198 7d495c01a8a6
parent 197 646d24a7ad36
child 199 6ce84c1270a6
access methods for labelText edited
ResourceRetriever.st
--- a/ResourceRetriever.st	Thu Jul 03 06:31:25 1997 +0200
+++ b/ResourceRetriever.st	Thu Jul 03 09:09:40 1997 +0200
@@ -76,6 +76,14 @@
     resourceOwner := nil.
 !
 
+labelText
+    ^ labelText
+!
+
+labelText:aText
+    labelText := aText
+!
+
 selector
     "return the value of the instance variable 'selector' (automatically generated)"