DoubleTree -> DTree

This commit is contained in:
2025-07-10 11:28:55 +01:00
parent e013bd57f7
commit a9d730a5c1
3 changed files with 25 additions and 25 deletions
+1 -1
View File
@@ -246,7 +246,7 @@ invLDT' = fmap propagateOrientation . invLDT
-- location ids
-- consider explicitly reseting the inventory ids (but this probably really
-- should be done upstream anyway in the actually creature inventory)
invRootMap :: IM.IntMap Item -> IM.IntMap (Maybe Int, DoubleTree Item)
invRootMap :: IM.IntMap Item -> IM.IntMap (Maybe Int, DTree Item)
invRootMap =
foldMap
(dtToIntMapWithRoot (^?! itLocation . ilInvID) . fmap (^. _1) . ldtToDT)