diff --git a/github-webhook-handler-snap.cabal b/github-webhook-handler-snap.cabal
--- a/github-webhook-handler-snap.cabal
+++ b/github-webhook-handler-snap.cabal
@@ -1,5 +1,5 @@
 name:                github-webhook-handler-snap
-version:             0.0.5
+version:             0.0.6
 
 synopsis:            GitHub WebHook Handler implementation for Snap
 description:
@@ -34,7 +34,7 @@
    , snap-core
    , uuid
    , github-types >=0.2 && <1
-   , github-webhook-handler >=0.0.5 && <1
+   , github-webhook-handler >=0.0.6 && <1
 
   exposed-modules:
      GitHub.WebHook.Handler.Snap
diff --git a/src/GitHub/WebHook/Handler/Snap.hs b/src/GitHub/WebHook/Handler/Snap.hs
--- a/src/GitHub/WebHook/Handler/Snap.hs
+++ b/src/GitHub/WebHook/Handler/Snap.hs
@@ -21,8 +21,8 @@
 
 
 
-webhookHandler :: ByteString -> [String] -> (Either Error (UUID, Payload) -> Snap ()) -> Snap ()
-webhookHandler hookPath secretKeys m =
+webhookHandler :: ByteString -> [String] -> Snap (Either Error (UUID, Payload))
+webhookHandler hookPath secretKeys =
     path hookPath $ method POST $ runHandler handler
   where
     handler = Handler
@@ -31,5 +31,4 @@
         , hHeader = \name -> do
             hdrs <- headers <$> getRequest
             return $ getHeader (CI.mk name) hdrs
-        , hAction = \res -> m res >> getResponse >>= finishWith
         }