diff options
Diffstat (limited to 'src/Main.elm')
| -rw-r--r-- | src/Main.elm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Main.elm b/src/Main.elm index 4fab1e9..fda7c01 100644 --- a/src/Main.elm +++ b/src/Main.elm @@ -11,6 +11,7 @@ import Keyboard import Char import Dict import List +import Keyboard (KeyCode) import Model.Model (..) import Model.Position (..) @@ -31,7 +32,7 @@ input = [ Signal.subscribe updates , Signal.map DeltaTime (fps 30) , Signal.map (\_ -> ClickAway) clickAway - , Signal.map KeyPressed Keyboard.lastPressed + , Signal.map KeyPressed keyPress ] port clickPosition : Signal Value @@ -52,6 +53,8 @@ port ringingTimers = model |> Signal.dropRepeats +port keyPress : Signal KeyCode + port clickAway : Signal () port initialTime : Time |