Remove most instances of LDTs from item use

2025-07-11 00:45:51 +01:00
parent e5eff32ce3
commit 05ff4651bd
3 changed files with 63 additions and 65 deletions
@@ -12,8 +12,8 @@ import Control.Lens
 import Dodge.Data.Item
 import Dodge.Data.TriggerType

-itemTriggerType :: LocationLDT ItemLink OItem -> TriggerType
-itemTriggerType loc = baseItemTriggerType $ loc ^. locLDT . ldtValue . _1
+itemTriggerType :: LocationDT OItem -> TriggerType
+itemTriggerType loc = baseItemTriggerType $ loc ^. locDT . dtValue . _1

 baseItemTriggerType :: Item -> TriggerType
 baseItemTriggerType itm = case itm ^. itType of