Separate out ammo data

src/Dodge/Combine/Module.hs

@@ -2,7 +2,6 @@ module Dodge.Combine.Module where
 import Dodge.Data
 import Dodge.Tesla
 import Dodge.Item.Weapon.ExtraEffect
-import Dodge.Item.Weapon.Launcher
 import Dodge.Item.Weapon.TriggerType
 import LensHelp
 import Geometry
@@ -34,7 +33,7 @@ moduleModification imt = case imt of
     STATICLAS   -> (itParams . lasBeam .~ BeamCombine teslaBeamCombine)
         . (itParams . subParams ?~ teslaParams)
     WEPTELE     -> makeDirectedTele
-    LAUNCHHOME  -> itConsumption . laAmmoType . amPjCreation .~ fireTrackingShell
+    LAUNCHHOME  -> itConsumption . laAmmoType . amPjCreation .~ CreateTrackingShell
     EXTRABATTERY -> itConsumption . laMax +~ 1000
     ATTACHTORCH  -> id
   where