Cleanup

2024-12-19 23:40:04 +00:00
parent f3cfe8cb5f
commit e1989eaa1e
28 changed files with 285 additions and 300 deletions
@@ -178,7 +178,7 @@ invItemLocUpdate cr loc w = doAnyEquipmentEffect loc cr $ case itm ^. itType of
    itm = loc ^. locLDT . ldtValue . _1

 doAnyEquipmentEffect :: LocationLDT ItemLink ComposedItem -> Creature -> World -> World
-doAnyEquipmentEffect loc cr = case itm ^? itLocation . ilEquipPosition . _Just of
+doAnyEquipmentEffect loc cr = case itm ^? itLocation . ilEquipSite . _Just of
    Just _ -> useE loc cr
    _ -> id
  where