packages feed

servant-subscriber 0.6.0.2 → 0.6.0.3

raw patch · 2 files changed

+7/−2 lines, 2 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Servant.Subscriber.Response: fromServantError :: ServantErr -> HttpResponse
+ Servant.Subscriber.Response: fromServantError :: ServerError -> HttpResponse

Files

servant-subscriber.cabal view
@@ -1,7 +1,7 @@ name:                servant-subscriber-version:             0.6.0.2+version:             0.6.0.3 synopsis:            When REST is not enough ...-description:         Please see Readme.md+description:         WebSocket based extension for your servant REST API which allows users to subscribe to change events. homepage:            http://github.com/eskimor/servant-subscriber#readme license:             BSD3 license-file:        LICENSE
src/Servant/Subscriber/Response.hs view
@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} {-# LANGUAGE DeriveGeneric #-} module Servant.Subscriber.Response where @@ -78,7 +79,11 @@ , statusMessage = T.decodeUtf8 . H.statusMessage $ s } +#if MIN_VERSION_servant(0,16,0)+fromServantError :: ServerError -> HttpResponse+#else fromServantError :: ServantErr -> HttpResponse+#endif fromServantError err =  HttpResponse {   httpStatus = Status (errHTTPCode err) (T.pack $ errReasonPhrase err) , httpHeaders = fromHTTPHeaders . errHeaders $ err