ez-couch 0.5.0 → 0.5.1
raw patch · 2 files changed
+4/−2 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- ez-couch.cabal +1/−1
- src/EZCouch/Action.hs +3/−1
ez-couch.cabal view
@@ -1,5 +1,5 @@ name: ez-couch-version: 0.5.0+version: 0.5.1 cabal-version: >=1.8 build-type: Simple license: MIT
src/EZCouch/Action.hs view
@@ -131,7 +131,9 @@ json <- body $$+- Atto.sinkParser Aeson.json case Aeson.fromJSON json of Aeson.Success (Error.Error "error" (Just reason) _)- | isPrefixOf "{{try_clause,{not_found,missing}}" reason+ | isPrefixOf "{{try_clause,{not_found,missing}}" reason + -> return ResponseNotFound+ Aeson.Success (Error.Error "not_found" (Just reason) _) -> return ResponseNotFound Aeson.Success _ -> throwIO $ ServerException $ "Status " ++ show code ++ " response: " ++ (decodeUtf8 . toStrict . Aeson.encode) json