hzulip 0.3.0.2 → 0.3.0.3
raw patch · 2 files changed
+1/−12 lines, 2 files
Files
- hzulip.cabal +1/−1
- src/HZulip.hs +0/−11
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