Fix tile rendering

2021-09-07 10:53:39 +01:00
parent 6ecd739d6f
commit 45bbf9b005
14 changed files with 66 additions and 100 deletions
@@ -16,7 +16,7 @@ corridor = defaultRoom
    , _rmPath  = concatMap (doublePair . (,) (V2 20 60) . fst) lnks
    , _rmPS    = []
    , _rmBound = [ rectNSWE 50 30 0 40 ]
-    , _rmFloor = [oTile poly 2]  
+    , _rmFloor = [makeTileFromPoly poly 2]  
    }
  where 
    poly = rectNSWE 80 0 0 40