ResourceRetriever.st
changeset 343 8358ce37f8be
parent 331 aa1663b8c2ab
child 373 ae526fcf716a
equal deleted inserted replaced
342:df086591eb11 343:8358ce37f8be
   128     selector isNil ifTrue:[
   128     selector isNil ifTrue:[
   129         ^nil
   129         ^nil
   130     ].
   130     ].
   131 
   131 
   132     resourceOwner isNil ifTrue:[
   132     resourceOwner isNil ifTrue:[
   133         (resourceOwner := Smalltalk classNamed:className) isNil ifTrue:[
   133         (resourceOwner := Smalltalk resolveName:className inClass:self class) isNil ifTrue:[
   134             ^ nil
   134             ^ nil
   135         ]
   135         ]
   136     ].
   136     ].
   137 
   137 
   138     (resourceOwner respondsTo:#visualFor:) ifTrue:[
   138     (resourceOwner respondsTo:#visualFor:) ifTrue:[