--- a/ResourceRetriever.st	Wed Oct 15 12:41:27 1997 +0200
+++ b/ResourceRetriever.st	Wed Oct 15 12:45:33 1997 +0200
@@ -123,16 +123,14 @@
 resource
     "returns form assigned to resource or nil
     "
-    |img cls|
+    |img cls appl|
 
     selector isNil ifTrue:[
         ^nil
     ].
 
     resourceOwner isNil ifTrue:[
-        (    className isNil
-          or:[(resourceOwner := Smalltalk at:className ifAbsent:nil) isNil]
-        ) ifTrue:[
+        (resourceOwner := Smalltalk classNamed:className) isNil ifTrue:[
             ^ nil
         ]
     ].