jamshred: Don't (move-player) in a tight loop.

[factor.git] / extra / jamshred / player / player.factor

diff --git a/extra/jamshred/player/player.factor b/extra/jamshred/player/player.factor
index 0abb77b1038275946d4d1fb2342aeca537be4ed8..22a0071e99c94a4cd837d64e306cd77a5976ea7a 100644 (file)
--- a/extra/jamshred/player/player.factor
+++ b/extra/jamshred/player/player.factor
@@ -132,7 +132,6 @@ CONSTANT: max-speed 30.0
     ?move-player-freely over 0 > [
         ! bounce
         drag-player
-        (move-player)
     ] when ;
 
 : move-player ( player -- )