Move weapon muzzles up a record

2025-06-04 09:29:09 +01:00
parent a71e237789
commit e1ec4e1a89
18 changed files with 81 additions and 96 deletions
@@ -118,7 +118,7 @@ bgateCalc x l r = (x `div` ((2::Int) ^ ((2::Int)*f l + f r))) `mod` 2
 itemScrollDisplay :: Item -> Maybe String
 itemScrollDisplay itm
    | HELD ALTERIFLE <- itm ^. itType = Just $
-        case itm ^? itUse . heldAim . aimMuzzles . ix 0 . mzAmmoSlot of
+        case itm ^? itUse . heldMuzzles . ix 0 . mzAmmoSlot of
            Just 0 -> "L"
            _ -> "R"
    | UseScope OpticScope{_opticZoom = x} <- itm ^. itUse = Just $ shortShow x