Commit before removing stackable items
This commit is contained in:
@@ -435,7 +435,7 @@ overNozzle eff ams it cr w nz =
|
||||
getAmmoMagazine :: Item -> Creature -> Maybe ItemUse
|
||||
getAmmoMagazine itm cr = do
|
||||
invid <- itm ^? itLocation . ipInvID
|
||||
amtype <- itm ^? itUse . heldConsumption . ix 0
|
||||
amtype <- itm ^? itUse . heldAmmoTypes . ix 0
|
||||
mag <- cr ^? crInv . ix (invid + 1) . itUse
|
||||
magtype <- mag ^? amagType
|
||||
guard $ amtype == magtype
|
||||
|
||||
Reference in New Issue
Block a user