Cleanup

2021-11-28 22:38:26 +00:00
parent 8c5777a1af
commit 8832a73d86
9 changed files with 21 additions and 24 deletions
@@ -35,7 +35,7 @@ worldSPic cfig w =
  where
    filtOn f g = IM.filter (pointIsClose . f) (g w)
    pointIsClose p = dist camCen p < winSize
-    winSize = 30 + max (getWindowX cfig) (getWindowY cfig)
+    winSize = 30 + max (_windowX cfig) (_windowY cfig)
    camCen = _cameraCenter w

 extraShapes :: World -> Shape