packages feed

hzulip 0.3.0.2 → 0.3.0.3

raw patch · 2 files changed

+1/−12 lines, 2 files

Files

hzulip.cabal view
@@ -1,5 +1,5 @@ name:                hzulip-version:             0.3.0.2+version:             0.3.0.3 synopsis:            A haskell wrapper for the Zulip API. description:         This a Zulip API wrapper for Haskell. homepage:            https://github.com/yamadapc/hzulip
src/HZulip.hs view
@@ -105,17 +105,6 @@         else fail $ responseMsg body  -- |--- Get a list of the streams the client is currently subscribed to.-getSubscriptions :: ZulipClient -> IO [String]-getSubscriptions z = do-    r <- getWith opts (subscriptionsUrl z) >>= asJSON-    let body = r ^. responseBody--    if wasSuccessful body-        then let Just subscriptions = responseSubscriptions in-            return subscriptions---- | -- Fetches new set of events from a `Queue`. getEvents :: ZulipClient -> Queue -> Bool -> IO (Queue, [Event]) getEvents z q b = do