justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Nest fields in CWorld

Browse Source
This commit is contained in:
justin
2022-08-19 11:28:19 +01:00
parent 9df0fa8692
commit 3b7841677a
10 changed files with 31 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/LevelGen/LevelStructure.hs
+1 -1
View File
@@ -14,7 +14,7 @@ import RandomHelp
worldToGenWorld :: IM.IntMap Room -> World -> GenWorld
worldToGenWorld rms w =
GenWorld
{ _gwWorld = w & cWorld . genParams .~ evalState generateGenParams (_randGen w)
{ _gwWorld = w & cWorld . cwGen . cwgParams .~ evalState generateGenParams (_randGen w)
, _genRooms = rms
, _genPlacements = mempty
}