diff --git a/lib/FRP/Netwire/Input/GLFW.hs b/lib/FRP/Netwire/Input/GLFW.hs
--- a/lib/FRP/Netwire/Input/GLFW.hs
+++ b/lib/FRP/Netwire/Input/GLFW.hs
@@ -86,7 +86,7 @@
          MonadKeyboard GLFW.Key (StateT GLFWInputState m) where
 
   keyIsPressed :: GLFW.Key -> StateT GLFWInputState m Bool
-  keyIsPressed key = get >>= (return . isKeyPressed key)
+  keyIsPressed key = get >>= (return . isKeyDown key)
 
   releaseKey :: GLFW.Key -> StateT GLFWInputState m ()
   releaseKey key = get >>= (put . debounceKey key)
@@ -120,11 +120,13 @@
                                cmode = CursorMode'Enabled,
                                scrollAmt = (0, 0) }
 
-isKeyPressed :: GLFW.Key -> GLFWInputState -> Bool
-isKeyPressed key = (Map.member key) . keysPressed
+isKeyDown :: GLFW.Key -> GLFWInputState -> Bool
+isKeyDown key = (Map.member key) . keysPressed
 
 withPressedKey :: GLFWInputState -> GLFW.Key -> (a -> a) -> a -> a
-withPressedKey input key fn = if isKeyPressed key input then fn else id
+withPressedKey input key fn
+  | isKeyDown key input = fn
+  | otherwise = id
 
 debounceKey :: GLFW.Key -> GLFWInputState -> GLFWInputState
 debounceKey key input = input { keysPressed = Map.delete key (keysPressed input) }
diff --git a/netwire-input-glfw.cabal b/netwire-input-glfw.cabal
--- a/netwire-input-glfw.cabal
+++ b/netwire-input-glfw.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                netwire-input-glfw
-version:             0.0.3
+version:             0.0.4
 synopsis:            GLFW instance of netwire-input
 description:         This package contains the necessary glue to allow the use
                      of wires from the netwire-input package. In general, the types
@@ -14,7 +14,7 @@
 license-file:        LICENSE
 author:              Pavel Krajcevski
 maintainer:          Krajcevski@gmail.com
-copyright:           Pavel Krajcevski, 2014
+copyright:           Pavel Krajcevski, 2015
 category:            Game
 build-type:          Simple
 extra-source-files:  examples/Cursor.hs README.md
@@ -35,10 +35,10 @@
                        InstanceSigs
   exposed-modules:     FRP.Netwire.Input.GLFW
   -- other-modules:       
-  build-depends:       base >=4.6 && <4.8,
+  build-depends:       base >= 4.6 && < 4.10,
                        netwire-input,
                        containers,
-                       GLFW-b,
+                       GLFW-b >= 1.4.7.2,
                        stm,
                        mtl
   hs-source-dirs:      lib
@@ -61,7 +61,7 @@
                     netwire-input,
                     netwire-input-glfw,
                     OpenGL,
-                    GLFW-b,
+                    GLFW-b >= 1.4.7.2,
                     transformers,
                     array,
                     bytestring,