notid/play-clj
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Remove :keycode from key events

Browse Source
This commit is contained in:
oakes
2014-08-02 15:58:11 -04:00
parent 2e87bcc712
commit f9a8fe7156
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/play_clj/core_listeners.clj
View File

@@ -8,13 +8,13 @@
execute-fn!] execute-fn!]
(reify InputProcessor (reify InputProcessor
(keyDown [this k] (keyDown [this k]
(execute-fn! on-key-down :key k :keycode k) (execute-fn! on-key-down :key k)
false) false)
(keyTyped [this c] (keyTyped [this c]
(execute-fn! on-key-typed :character c) (execute-fn! on-key-typed :character c)
false) false)
(keyUp [this k] (keyUp [this k]
(execute-fn! on-key-up :key k :keycode k) (execute-fn! on-key-up :key k)
false) false)
(mouseMoved [this sx sy] (mouseMoved [this sx sy]
(execute-fn! on-mouse-moved :input-x sx :input-y sy) (execute-fn! on-mouse-moved :input-x sx :input-y sy)