ResourcePack.st
changeset 8545 87303124e4d4
parent 8544 b2e773616081
child 8546 199fb5dfe026
--- a/ResourcePack.st	Wed Oct 24 18:07:22 2018 +0200
+++ b/ResourcePack.st	Wed Oct 24 18:07:51 2018 +0200
@@ -481,7 +481,6 @@
 newDefaultResourcePackForPackage:package
     |rsrcs cls superPack|
 
-    rsrcs := ResourcePack new.
     package ~= 'stx:libtool' ifTrue:[
         (cls := Smalltalk classNamed:'stx_libtool') notNil ifTrue:[
             superPack := cls classResources
@@ -492,6 +491,7 @@
             superPack := cls classResources
         ].        
     ].
+    rsrcs := ResourcePack new.
     superPack notNil ifTrue:[ rsrcs addSuperPack:superPack ].
     ^ rsrcs