diff options
-rw-r--r-- | Spear/Window.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Spear/Window.hs b/Spear/Window.hs index 453f67d..20d7acc 100644 --- a/Spear/Window.hs +++ b/Spear/Window.hs | |||
@@ -127,6 +127,8 @@ setup (w, h) windowTitle = do | |||
127 | 127 | ||
128 | GLFW.makeContextCurrent maybeWindow | 128 | GLFW.makeContextCurrent maybeWindow |
129 | 129 | ||
130 | GLFW.swapInterval 1 -- Enable vsync. | ||
131 | |||
130 | GLFW.setWindowCloseCallback window . Just $ onWindowClose closeRequest | 132 | GLFW.setWindowCloseCallback window . Just $ onWindowClose closeRequest |
131 | GLFW.setWindowSizeCallback window . Just $ onResize windowEvents | 133 | GLFW.setWindowSizeCallback window . Just $ onResize windowEvents |
132 | GLFW.setKeyCallback window . Just $ onKey inputEvents | 134 | GLFW.setKeyCallback window . Just $ onKey inputEvents |