ResourceRetriever.st
changeset 3306 69517757bffa
parent 2903 f8a9324436cc
child 3846 b86fdd84bc87
--- a/ResourceRetriever.st	Wed Mar 12 18:22:11 2014 +0100
+++ b/ResourceRetriever.st	Wed Mar 12 18:23:07 2014 +0100
@@ -126,20 +126,18 @@
         in aResourceOwner, 
         in class of aResourceOwner,
         in resources of class of aResourceOwner,
-        and finally in my label resources
-    "
+        and finally in my label resources"
 
     |resources|
 
     aResourceOwner isNil ifTrue: [^label].
 
     label isSymbol ifTrue:[
-        (aResourceOwner respondsTo: label) ifTrue:[           
+        (aResourceOwner respondsTo:label) ifTrue:[           
             ^ aResourceOwner perform:label
         ].
 
-        (aResourceOwner isClass not 
-        and: [aResourceOwner class respondsTo: label])
+        (aResourceOwner isClass not and:[aResourceOwner class respondsTo:label])
         ifTrue:[            
             ^ aResourceOwner perform:label
         ].
@@ -159,7 +157,6 @@
     ].
 
     ^ self labelResources string:label
-  
 !
 
 labelResources
@@ -355,9 +352,10 @@
 !ResourceRetriever class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ResourceRetriever.st,v 1.14 2011-03-24 15:55:44 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ResourceRetriever.st,v 1.15 2014-03-12 17:23:07 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ResourceRetriever.st,v 1.14 2011-03-24 15:55:44 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ResourceRetriever.st,v 1.15 2014-03-12 17:23:07 stefan Exp $'
 ! !
+