aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Spear/App/Input.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Spear/App/Input.hs b/Spear/App/Input.hs
index 74ee1eb..3aabdd0 100644
--- a/Spear/App/Input.hs
+++ b/Spear/App/Input.hs
@@ -37,7 +37,7 @@ data Key
37 | KEY_Y | KEY_Z | KEY_0 | KEY_1 | KEY_2 | KEY_3 | KEY_4 | KEY_5 37 | KEY_Y | KEY_Z | KEY_0 | KEY_1 | KEY_2 | KEY_3 | KEY_4 | KEY_5
38 | KEY_6 | KEY_7 | KEY_8 | KEY_9 | KEY_F1 | KEY_F2 | KEY_F3 38 | KEY_6 | KEY_7 | KEY_8 | KEY_9 | KEY_F1 | KEY_F2 | KEY_F3
39 | KEY_F4 | KEY_F5 | KEY_F6 | KEY_F7 | KEY_F8 | KEY_F9 | KEY_F10 39 | KEY_F4 | KEY_F5 | KEY_F6 | KEY_F7 | KEY_F8 | KEY_F9 | KEY_F10
40 | KEY_F11 | KEY_F12 | KEY_ESC 40 | KEY_F11 | KEY_F12 | KEY_ESC | KEY_SPACE
41 deriving (Enum, Bounded) 41 deriving (Enum, Bounded)
42 42
43 43
@@ -212,6 +212,7 @@ toGLFWkey KEY_F10 = fromEnum GLFW.F10
212toGLFWkey KEY_F11 = fromEnum GLFW.F11 212toGLFWkey KEY_F11 = fromEnum GLFW.F11
213toGLFWkey KEY_F12 = fromEnum GLFW.F12 213toGLFWkey KEY_F12 = fromEnum GLFW.F12
214toGLFWkey KEY_ESC = fromEnum GLFW.ESC 214toGLFWkey KEY_ESC = fromEnum GLFW.ESC
215toGLFWkey KEY_SPACE = ord ' '
215 216
216 217
217toGLFWbutton :: MouseButton -> GLFW.MouseButton 218toGLFWbutton :: MouseButton -> GLFW.MouseButton