Separate out concrete part of world

2022-07-25 12:10:50 +01:00
parent 3354d108be
commit b2efbd2b3e
134 changed files with 933 additions and 930 deletions
@@ -23,6 +23,6 @@ fixedCoordPictures u = case _menuLayers u of

 customMouseCursor :: Configuration -> World -> Picture
 customMouseCursor cfig w = winScale cfig
-    . uncurryV translate (_mousePos w)
+    . uncurryV translate (_mousePos (_cWorld w))
    . color white
    $ pictures [ line [V2 (-5) 0,V2 5 0] , line [V2 0 (-5),V2 0 5] ]