From 80860264a33c0e7a7d55dfaf2e62c80a223d46e1 Mon Sep 17 00:00:00 2001
From: nek0 <nek0@nek0.eu>
Date: Wed, 19 Sep 2018 23:44:27 +0200
Subject: [PATCH] shrink playarea

---
 src/MainGame/WorldMap.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/MainGame/WorldMap.hs b/src/MainGame/WorldMap.hs
index ea1a7db..1fea1e1 100644
--- a/src/MainGame/WorldMap.hs
+++ b/src/MainGame/WorldMap.hs
@@ -86,7 +86,7 @@ loadMapFork ud ad future progress = do
       fc = FloorConfig
         (V2 10 10)
         [(V2 5 5), (V2 5 20)]
-        (50, 50)
+        (40, 40)
   modifyMVar_ progress (return . (\(p, _) ->
     ( p + increment
     , "Building floor"