Commit before pushing more input events into update

2022-10-29 22:33:10 +01:00
parent afaef480db
commit e3155752ba
36 changed files with 121 additions and 147 deletions
@@ -98,7 +98,7 @@ boostPoint x cr w = case mayp2 of
  where
    cpos = _crPos cr
    r = 1.5 * _crRad cr
-    p1 = cpos +.+ x *.* squashNormalizeV (mouseWorldPos (w ^. input) (w ^. cWorld . lWorld . camPos) -.- cpos)
+    p1 = cpos +.+ x *.* squashNormalizeV (mouseWorldPos (w ^. input) (w ^. cWorld . camPos) -.- cpos)
    mayp2 = bouncePoint (const True) 1 cpos p1 w

 addBoostShockwave ::