diff options
Diffstat (limited to 'src/Xanthous/App.hs')
| -rw-r--r-- | src/Xanthous/App.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/src/Xanthous/App.hs b/src/Xanthous/App.hs index 2bdf6142f9fd..5fb70bd075b6 100644 --- a/src/Xanthous/App.hs +++ b/src/Xanthous/App.hs @@ -90,11 +90,7 @@ initLevel = do generateLevel SCaveAutomata CaveAutomata.defaultParams $ Dimensions 80 80 - entities <>= (SomeEntity <$> level ^. levelWalls) - entities <>= (SomeEntity <$> level ^. levelItems) - entities <>= (SomeEntity <$> level ^. levelCreatures) - entities <>= (SomeEntity <$> level ^. levelTutorialMessage) - + entities <>= levelToEntityMap level characterPosition .= level ^. levelCharacterPosition -------------------------------------------------------------------------------- |