diff -r 703dda9d1d81 -r cb10fe17ad40 ResourcePack.st --- a/ResourcePack.st Mon Oct 15 02:01:13 2018 +0200 +++ b/ResourcePack.st Mon Oct 15 02:06:57 2018 +0200 @@ -374,7 +374,7 @@ ]. '4) fromFile ' print. resourceFileName print. -' in ' print. resourceFileName printCR. +' in ' print. rsrcDir printCR. pack := self fromFile:resourceFileName directory:rsrcDir cached:cached. pack packsClassOrFileName:fullName. ^ pack @@ -427,6 +427,8 @@ KeepStatisticsOnUsedKeys == true ifTrue:[ newPack rememberUsedKeys. ]. +'5) file ' print. aFileName print. +' in ' print. dirName printCR. newPack readFromFile:aFileName directory:dirName. cached ifTrue:[ self addToCache:newPack. @@ -1541,6 +1543,8 @@ ]. ]. +'6) inStream ' print. inStream printCR. + inStream isNil ifTrue:[ " an empty pack