1 files changed, 3 insertions, 3 deletions

diff --git a/Spear/App/Input.hs b/Spear/App/Input.hs
index 6ebb45d..4f3807f 100644
--- a/Spear/App/Input.hs
+++ b/Spear/App/Input.hs
@@ -100,9 +100,9 @@ getMouse oldMouse =
         prop' _    ypos MouseDY = ypos - property oldMouse MouseY
 
         buttons  = fmap toEnum [0..fromEnum (maxBound :: MouseButton)]
-        getKeystate = (fmap (V.fromList . fmap ((==) GLFW.Press)) .
-                       mapM GLFW.getMouseButton .
-                       fmap toGLFWbutton $ buttons)
+        getKeystate = fmap (V.fromList . fmap ((==) GLFW.Press)) .
+                      mapM GLFW.getMouseButton .
+                      fmap toGLFWbutton $ buttons
     in do
         Position xpos ypos <- get GLFW.mousePos
         keystate <- getKeystate