Cleanup

2025-10-12 20:40:40 +01:00
parent 3206cdebf6
commit 5e5b24cad0
11 changed files with 157 additions and 139 deletions
@@ -215,7 +215,7 @@ rotateToOverlappingWall w =
        w
  where
    cr = you w
-    p = (you w) ^. crPos . _xy
+    p = you w ^. crPos . _xy

 doWallRotate :: Wall -> World -> World
 doWallRotate wl w