github-webhook-handler-snap 0.0.5 → 0.0.6
raw patch · 2 files changed
+4/−5 lines, 2 filesdep ~github-webhook-handlerPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: github-webhook-handler
API changes (from Hackage documentation)
- GitHub.WebHook.Handler.Snap: webhookHandler :: ByteString -> [String] -> (Either Error (UUID, Payload) -> Snap ()) -> Snap ()
+ GitHub.WebHook.Handler.Snap: webhookHandler :: ByteString -> [String] -> Snap (Either Error (UUID, Payload))
Files
github-webhook-handler-snap.cabal view
@@ -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
src/GitHub/WebHook/Handler/Snap.hs view
@@ -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 }