Commit before changing ItemUse into single product type

2024-12-20 14:49:18 +00:00
parent e1989eaa1e
commit 3a72bd366f
8 changed files with 32 additions and 27 deletions
@@ -90,6 +90,9 @@ itemToFunction itm = case itm ^. itType of
    HELD{} -> case itm ^? itUse . useCondition of
        Just MustBeHeld -> HeldPlatformSF
        _ -> GadgetPlatformSF
+    _ | Just amtype <- itm ^? itConsumables . magType
+        , Just _ <- itm ^? itLocation . ilEquipSite . _Just
+        -> AmmoMagSF amtype
    AMMOMAG{} -> maybe UncomposableIsolateSF AmmoMagSF $ itm ^? itConsumables . magType
    ATTACH REMOTESCREEN -> RemoteScreenSF
    ATTACH BULLETSYNTH -> AmmoModifierSF BulletAmmo