Move muzzles out of records

src/Dodge/Default/Item.hs

@@ -11,7 +11,7 @@ import Control.Lens
 import qualified Data.IntMap.Strict as IM
 import Dodge.Data.Item
 import Dodge.Default.Item.Use
-import Geometry.Data
+--import Geometry.Data
 
 defaultHeldItem :: Item
 defaultHeldItem =
@@ -42,8 +42,8 @@ defaultBulletWeapon :: Item
 defaultBulletWeapon =
     defaultHeldItem
         & itAmmoSlots .~ singleAmmo BulletAmmo
-        & itUse . heldMuzzles .~ 
-            [Muzzle (V2 15 0) 0 0.01 0 BasicFlare MuzzleShootBullet (UseExactly 1) 0]
+--        & itUse . heldMuzzles .~ 
+--            [Muzzle (V2 15 0) 0 0.01 0 BasicFlare MuzzleShootBullet (UseExactly 1) 0]
 
 defaultItEffect :: ItEffect
 defaultItEffect =