justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Move equipment effects into "zipper" item update

Browse Source
This commit is contained in:
justin
2024-12-19 10:00:39 +00:00
parent 19e5927934
commit 3ffe61e6db
5 changed files with 15 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Creature/Statistics.hs
+1 -1
View File
@@ -24,7 +24,7 @@ equipmentStrValue itm = case _itType itm of
_ -> 0
crCurrentEquipment :: Creature -> IM.IntMap Item
crCurrentEquipment = IM.filter (isJust . (^? itLocation . ilEquipPosition)) . _crInv
crCurrentEquipment = IM.filter (isJust . (^? itLocation . ilEquipPosition . _Just)) . _crInv
-- merge
-- dropMissing
-- dropMissing