ResourceRetriever.st
changeset 1956 7bfc5c973c1b
parent 1934 c069a501a14c
child 2021 e5b13637d00a
--- a/ResourceRetriever.st	Fri Mar 12 13:28:38 2004 +0100
+++ b/ResourceRetriever.st	Fri Mar 12 13:43:46 2004 +0100
@@ -167,11 +167,10 @@
 !
 
 labelResources
-    "if not already loaded, get the common label resourcePack
-     and return it"
+    "if not already loaded, get the common label resourcePack and return it"
 
     LabelResources isNil ifTrue:[
-        LabelResources := ResourcePack for:self.
+        LabelResources := self classResources.
     ].
     ^ LabelResources
 ! !
@@ -354,5 +353,5 @@
 !ResourceRetriever class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ResourceRetriever.st,v 1.9 2004-02-26 20:04:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ResourceRetriever.st,v 1.10 2004-03-12 12:43:07 cg Exp $'
 ! !