Fix tile drawing bug

2021-10-04 17:20:18 +01:00
parent a6a3841d36
commit cab8c25610
5 changed files with 25 additions and 9 deletions
@@ -128,7 +128,7 @@ gameRoomsFromRooms = map f
        , _grDir   = snd . last $ _rmLinks rm
        , _grName  = _rmName rm
        }
-    closePoints x y = dist x y < 1
+    closePoints x y = roundPoint2 x == roundPoint2 y

 floorsFromRooms :: [Room] -> [(Point3,Point3)]
 floorsFromRooms = concatMap (concatMap tToRender . _rmFloor)