diff options
author | Joris Guyonvarch | 2015-03-07 12:16:32 +0100 |
---|---|---|
committer | Joris Guyonvarch | 2015-03-07 12:16:32 +0100 |
commit | 8f8df67f3795b02c6918d7df832580e9de7d0802 (patch) | |
tree | e8788ff319b0b18f7cf3bead073a8e90a36608ee /src/Step.elm | |
parent | 1b23d8adcd01345eb4a2e7299e07b1f37fee7e8a (diff) |
Generate html with elm
Diffstat (limited to 'src/Step.elm')
-rw-r--r-- | src/Step.elm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Step.elm b/src/Step.elm index 3310339..e2b7fa7 100644 --- a/src/Step.elm +++ b/src/Step.elm @@ -16,8 +16,6 @@ import CloudStep (cloudStep) import Config (otherConfig) import Input (Input) -import Debug - step : Input -> Game -> Game step {dir, inputKeysDown, delta} {time, keysDown, score, player, cloud, bestScore, seed} = let hostilePoints = cloud.points (otherConfig player.config) @@ -29,7 +27,7 @@ step {dir, inputKeysDown, delta} {time, keysDown, score, player, cloud, bestScor newPlayer = playerStep delta dir (newKeyCode keysDown inputKeysDown) player (newCloud, addScore, newSeed) = cloudStep time seed newPlayer cloud in { time = newTime - , keysDown = Debug.log "keysdown" inputKeysDown + , keysDown = inputKeysDown , score = score + addScore , player = newPlayer , cloud = newCloud |