nek0/tracer
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

shrink playarea

Browse source
This commit is contained in:
nek0 2018-09-19 23:44:27 +02:00
parent 086302be5e
commit 80860264a3
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/MainGame/WorldMap.hs
View file

@ -86,7 +86,7 @@ loadMapFork ud ad future progress = do
fc = FloorConfig fc = FloorConfig
(V2 10 10) (V2 10 10)
[(V2 5 5), (V2 5 20)] [(V2 5 5), (V2 5 20)]
(50, 50) (40, 40)
modifyMVar_ progress (return . (\(p, _) -> modifyMVar_ progress (return . (\(p, _) ->
( p + increment ( p + increment
, "Building floor" , "Building floor"