Make items recoverable from base type

src/Dodge/Creature.hs

@@ -13,7 +13,7 @@ import Dodge.Creature.State.Data
 import Dodge.Creature.Update
 import Dodge.Prop.Gib
 --import Dodge.Item.Weapon.Grenade
-import Dodge.Item.Weapon.Booster
+import Dodge.Item.Equipment.Booster
 import Dodge.Item.Weapon.Utility
 import Dodge.Item.Weapon.Drone
 import Dodge.Item.Craftable
@@ -253,9 +253,9 @@ testInventory = IM.fromList $ zip [0..]
     , flatShield
     , sniperRifle
     , makeTypeCraftNum 1 MOTOR
-    , makeModule INCENDIARYMODULE
-    , makeModule STATICMODULE
-    , makeModule CONCUSSMODULE
+    , makeTypeCraft INCENDIARYMODULE
+    , makeTypeCraft STATICMODULE
+    , makeTypeCraft CONCUSSMODULE
 --    , bounceModule
 --    , medkit 50 & itConsumption . itAmount .~ 3
     , teleportModule
@@ -302,7 +302,7 @@ stackedInventory = IM.fromList $ zip [0..]
     ,flameThrower
     ,poisonSprayer
     ,launcher
-    ,lasDrones
+    ,droneLauncher
     --,lasGun
     --,grenade
     --,ltAutoGun,flamer,multGun,spreadGun,remoteLauncher