Make equipment effects use item locations

Move towards removing on/off equipment effects
2024-12-19 11:15:21 +00:00
parent 3ffe61e6db
commit a669632226
9 changed files with 110 additions and 103 deletions
@@ -90,7 +90,7 @@ rmInvItem cid invid w =
    itm = _crInv cr IM.! invid
    dounequipfunction = fromMaybe id $ do
        rmf <- itm ^? itUse . uequipEffect . eeOnRemove
-        return $ useE rmf itm cr
+        return $ doItmCrWdWd rmf itm cr
    doanyitemeffect = fromMaybe id $ do
        rmf <- itm ^? itEffect . ieOnDrop
        return $ doInvEffect rmf itm cr