--- a/ResourcePack.st Mon Sep 18 15:27:07 2006 +0200
+++ b/ResourcePack.st Mon Sep 18 16:57:29 2006 +0200
@@ -220,6 +220,8 @@
|nm pack rsrcDir baseName|
+^ self forPackage:(aClass resourcePackage) cached:cached.
+
nm := aClass resourcePackName.
cached ifTrue:[
pack := self searchCacheFor:nm.
@@ -1155,7 +1157,7 @@
!ResourcePack class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.111 2006-09-18 08:54:02 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.112 2006-09-18 14:57:29 cg Exp $'
! !
ResourcePack initialize!