Fix aiming with no weapon crash

2022-02-08 12:47:58 +00:00
parent 9ead5b3979
commit 0a860e6f68
39 changed files with 317 additions and 244 deletions
@@ -89,7 +89,7 @@ makeExplosionAt p w
    fVs' = zipWith (+.+) fVs $ map inversePushOut fPs'
    sizes = randomRs (2,9) $ _randGen w
    times = randomRs (20,25) $ _randGen w
-    mF q z v size time = makeFlameletTimed q z v Nothing size time
+    mF q z v size time = makeFlamelet q z v Nothing size time
    newFs = zipWith5 mF fPs zs (fmap (3 *.*) fVs') sizes times
    addFlames w' = foldr ($) w' newFs
    pushAgainstWalls q = maybe q (uncurry (+.+)) $ reflectPointWalls p q $ wallsNearPoint q w