--- a/ResourceRetriever.st	Thu Oct 16 15:18:23 1997 +0200
+++ b/ResourceRetriever.st	Wed Oct 22 15:26:38 1997 +0200
@@ -130,7 +130,7 @@
     ].
 
     resourceOwner isNil ifTrue:[
-        (resourceOwner := Smalltalk classNamed:className) isNil ifTrue:[
+        (resourceOwner := Smalltalk resolveName:className inClass:self class) isNil ifTrue:[
             ^ nil
         ]
     ].