Get rid of warnings

2025-06-07 19:14:56 +01:00
parent 81a7dcd962
commit faa3c4cde4
12 changed files with 85 additions and 96 deletions
@@ -16,7 +16,7 @@ updateLaser w pt =
    ( case _lpType pt of
        DamageLaser dam ->
            damThingHitWith
-                (\p1 p2 p3 -> Lasering dam p2 (p3 - p2))
+                (\p1 p2 p3 -> Lasering dam p2 (p3 - p1))
                sp
                xp
                thHit