From 4777b94dfcabec6710d08c6a5eaf3870c1bd6cba Mon Sep 17 00:00:00 2001 From: justin Date: Fri, 5 Dec 2025 10:33:20 +0000 Subject: [PATCH] Tweak projectile wall collision position --- src/Dodge/Projectile/Update.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Dodge/Projectile/Update.hs b/src/Dodge/Projectile/Update.hs index e073ef93f..edb15c4e8 100644 --- a/src/Dodge/Projectile/Update.hs +++ b/src/Dodge/Projectile/Update.hs @@ -67,7 +67,7 @@ shellHitWall p n wl pj (topj . pjVel %~ reflectInNormal n) . (topj . pjPos .~ p + normalize n) . bounceSound pj - | otherwise = topj %~ ((pjPos .~ p) . (pjTimer .~ 0)) + | otherwise = topj %~ ((pjPos .~ p - normalize (pj ^. pjVel)) . (pjTimer .~ 0)) where topj = cWorld . lWorld . projectiles . ix (_pjID pj)