Update path zoning on reading a save

2025-10-21 15:50:49 +01:00
parent 1918fc8c56
commit fcffbd5f43
4 changed files with 13 additions and 3 deletions
@@ -48,6 +48,7 @@ generateLevelFromRoomList gr' w =
 --            & cWorld . pathGraph .~ path
            & cWorld . incNode .~ inodes
            & cWorld . incGraph .~ igraph
+            & cWorld . incEdges .~ ipairs
 --            & pnZoning .~ foldl' (flip zonePn) mempty (labNodes path)
 --            & peZoning .~ foldl' (flip zonePe) mempty (map fromEdgeTuple $ labEdges path)
            & incNodeZoning .~ UV.ifoldl' (\m i p -> zonePn (i,p) m) mempty inodes