hackernews 0.3.0.0 → 0.3.1.0

raw patch · 2 files changed

+4/−2 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• hackernews.cabal +1/−1
• src/Web/HackerNews/Client.hs +3/−1

@@ -1,5 +1,5 @@ name:                hackernews-version:             0.3.0.0+version:             0.3.1.0 description:         API for news.ycombinator.com license:             MIT synopsis:            API for Hacker News

@@ -38,6 +38,7 @@ data HackerNewsError =     ConnectionError   | ParseError+  | NotFound   | RequestError   deriving (Show, Eq) @@ -70,13 +71,14 @@     case bytes of       Nothing -> left RequestError       Just bs -> do+        liftIO $ print bs         let xs = rights [parseOnly value bs, parseOnly json bs]         case xs of           []    -> left ParseError           x : _ ->             case fromJSON x of              Success jsonBody -> right jsonBody-             _                -> left ParseError+             _                -> left NotFound