Fix aiming with scope

src/Dodge/Item/Held/Rod.hs

@@ -69,11 +69,6 @@ sniperRifle =
         & itUse . heldAim . aimMuzzles . ix 0 . mzInaccuracy .~ 0
         & itUse . heldAim . aimZoom .~ defaultItZoom{_izMax = 0.5, _izMin = 0.5,_izFac = 1}
 --        & itUse . heldScroll .~ HeldScrollZoom -- zoomLongGun
---        & itScope .~ ZoomScope 
---            { _scopePos = (V2 0 0)
---            , _scopeZoom =  1
---            , _scopeDefaultZoom = 0.5 
---            }
 --        & itType . iyModules . at ModTarget ?~ TARGET TargetLaser
 --        & itUse . useTargeting ?~ TargetLaser
 

src/Dodge/Item/Held/Utility.hs

@@ -23,22 +23,6 @@ keyCard n = defaultHeldItem & itType . iyBase .~ HELD (KEYCARD n)
 latchkey :: Int -> Item
 latchkey _ = defaultHeldItem 
 
-binoculars :: Item
-binoculars =
-    defaultHeldItem
---        & itScope .~ ZoomScope 
---            { _scopePos = (V2 0 0) 
---            , _scopeZoom = 1 
---            , _scopeDefaultZoom = 0.5 
---            }
-        & itType . iyBase .~ HELD BINOCULARS
-        -- & itUse . heldAim . aimHandlePos .~ 5
---        & itUse . heldAim . aimMuzPos .~ 10
-        & itUse . heldAim . aimStance .~ TwoHandFlat
---        & itUse . heldScroll .~ HeldScrollZoom -- zoomLongGun
-        & itUse . heldAim . aimZoom .~ defaultItZoom{_izMax = 0.5, _izMin = 0.5, _izFac = 1}
-
-
 torch :: Item
 torch =
     defaultHeldItem