Tweak projectile wall collision position

2025-12-05 10:33:20 +00:00
parent 0a34db312f
commit 4777b94dfc
1 changed files with 1 additions and 1 deletions
@@ -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)