Explicitly store list of barrels for weapons

src/Dodge/Item/Held/Rod.hs

@@ -7,7 +7,6 @@ module Dodge.Item.Held.Rod (
     machineGun,
 ) where
 
-import Dodge.Item.Held.SingleBarrel
 import Dodge.Data.Item
 import Dodge.Default
 import Dodge.Item.Weapon.Bullet
@@ -23,7 +22,7 @@ bangRod =
                 { _muzVel = 0.8
                 , _rifling = 1
                 , _bore = 2
-                , _gunBarrels = singleBarrel 0.1
+                , _gunBarrels = [GunBarrel 0 0 0.1]
                 , _recoil = 50
                 , _torqueAfter = 0.3
                 , _randomOffset = 0
@@ -48,7 +47,7 @@ elephantGun =
     bangRod
         & itType . iyBase .~ HELD ELEPHANTGUN
         & itUse . heldAim . aimStance .~ TwoHandTwist
-        & itParams . gunBarrels .~ singleBarrel 0.05
+        & itParams . gunBarrels .~ [GunBarrel 0 0 0.05]
         & itUse . heldMods .~ ElephantGunMod
         & itParams . recoil .~ 50
         & itParams . torqueAfter .~ 0.1
@@ -69,7 +68,7 @@ sniperRifle :: Item
 sniperRifle =
     elephantGun
         & itType . iyBase .~ HELD SNIPERRIFLE
-        & itParams . gunBarrels .~ singleBarrel 0
+        & itParams . gunBarrels .~ [GunBarrel 0 0 0]
         & itUse . heldAim . aimZoom .~ defaultItZoom{_izMax = 0.5, _izMin = 0.5,_izFac = 1}
         & itUse . heldScroll .~ HeldScrollZoom -- zoomLongGun
         & itScope .~ ZoomScope (V2 0 0) 1 0.5 False