diff --git a/github-webhook-handler.cabal b/github-webhook-handler.cabal
--- a/github-webhook-handler.cabal
+++ b/github-webhook-handler.cabal
@@ -1,5 +1,5 @@
 name:                github-webhook-handler
-version:             0.0.6
+version:             0.0.7
 
 synopsis:            GitHub WebHook Handler
 description:
diff --git a/src/GitHub/WebHook/Handler.hs b/src/GitHub/WebHook/Handler.hs
--- a/src/GitHub/WebHook/Handler.hs
+++ b/src/GitHub/WebHook/Handler.hs
@@ -9,6 +9,8 @@
 
 import           Crypto.Hash
 
+import           Control.Applicative
+
 import           Data.Aeson (eitherDecodeStrict')
 import           Data.Aeson.Types (parseEither)
 
@@ -74,7 +76,7 @@
     (hmacGetDigest (hmac (BC8.pack key) rawBody :: HMAC SHA1)))
 
 
-runHandler :: Monad m => Handler m -> m (Either Error (UUID, Payload))
+runHandler :: (Applicative m, Monad m) => Handler m -> m (Either Error (UUID, Payload))
 runHandler h = do
     mbDelivery <- pure . (fromASCIIBytes =<<) =<< hHeader h "X-GitHub-Delivery"