diff options
Diffstat (limited to 'users/grfn/xanthous/src/Xanthous/Generators/Level.hs')
| -rw-r--r-- | users/grfn/xanthous/src/Xanthous/Generators/Level.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/users/grfn/xanthous/src/Xanthous/Generators/Level.hs b/users/grfn/xanthous/src/Xanthous/Generators/Level.hs index ac97159f422c..fc57402e7d8e 100644 --- a/users/grfn/xanthous/src/Xanthous/Generators/Level.hs +++ b/users/grfn/xanthous/src/Xanthous/Generators/Level.hs @@ -141,7 +141,7 @@ generateLevel gen ps dims num = do village <- generateVillage cells gen let _levelExtra = village _levelItems <- randomItems cells - _levelCreatures <- randomCreatures cells + _levelCreatures <- randomCreatures num cells _levelDoors <- randomDoors cells _levelCharacterPosition <- chooseCharacterPosition cells let upStaircase = _EntityMap # [(_levelCharacterPosition, UpStaircase)] |