Cleanup, fix broken records in LeftUse

2024-10-03 10:34:17 +01:00
parent e88b3c7443
commit 1953fb2d0c
19 changed files with 71 additions and 114 deletions
@@ -92,8 +92,8 @@ toggleEquipmentAt invid cr w = case getEquipmentAllocation w of
    itmat i = _crInv cr IM.! i
    itm = itmat itRef
    itRef = cr ^?! crManipulation . manObject . imSelectedItem -- unsafe!! TODO change?
-    onequip itm' = useE ((_eeOnEquip . _equipEffect . _itUse) itm') itm'
-    onremove itm' = useE ((_eeOnRemove . _equipEffect . _itUse) itm') itm'
+    onequip itm' = useE ((_eeOnEquip . _uequipEffect . _itUse) itm') itm'
+    onremove itm' = useE ((_eeOnRemove . _uequipEffect . _itUse) itm') itm'

 -- need to make sure that the root item is not erroneously selected in the
 -- following