Major item refactor, still broken
This commit is contained in:
+2
-2
@@ -17,7 +17,7 @@ import Data.Traversable
|
||||
import Dodge.Data.GenWorld
|
||||
import Dodge.Default.Wall
|
||||
import Dodge.GameRoom
|
||||
import Dodge.Item.Location.Initialize
|
||||
--import Dodge.Item.Location.Initialize
|
||||
import Dodge.LevelGen.LevelStructure
|
||||
import Dodge.LevelGen.StaticWalls
|
||||
import Dodge.Path
|
||||
@@ -36,7 +36,7 @@ generateLevelFromRoomList gr' w =
|
||||
over gwWorld initWallZoning
|
||||
. over gwWorld randomCompass
|
||||
. over gwWorld setupWorldBounds
|
||||
. over (gwWorld . cWorld . lWorld) initItemLocations
|
||||
-- . over (gwWorld . cWorld . lWorld) initItemLocations
|
||||
. doAfterPlacements
|
||||
. doInPlacements
|
||||
. doOutPlacements
|
||||
|
||||
Reference in New Issue
Block a user