ResourceRetriever.st
changeset 476 05adf036c0ac
parent 399 0822ecf56bf2
child 815 b2b9356a648c
--- a/ResourceRetriever.st	Fri Jan 23 19:05:04 1998 +0100
+++ b/ResourceRetriever.st	Mon Jan 26 13:53:41 1998 +0100
@@ -247,12 +247,16 @@
      or if labelText not nil:
         (#ResourceRetriever className selector labelText)
     "
+    |myClassName|
+
+    myClassName := self class name.
     labelText isNil ifTrue:[
-        ^ Array with:(self class name) with:className with:selector
+        ^ Array with:myClassName with:className with:selector
     ] ifFalse:[
-        ^ Array with:(self class name) with:className with:selector with:labelText
+        ^ Array with:myClassName with:className with:selector with:labelText
     ].
 
+    "Modified: / 26.1.1998 / 13:52:43 / cg"
 ! !
 
 !ResourceRetriever methodsFor:'testing'!