twitter-conduit 0.0.6 → 0.0.7
raw patch · 3 files changed
+24/−1 lines, 3 files
Files
- Web/Twitter/Conduit/Parameters.hs +8/−0
- Web/Twitter/Conduit/Stream.hs +15/−0
- twitter-conduit.cabal +1/−1
Web/Twitter/Conduit/Parameters.hs view
@@ -24,7 +24,11 @@ , HasDisplayCoordinatesParam (..) , HasPossiblySensitiveParam (..) , HasLangParam (..)+ , HasLanguageParam (..) , HasLocaleParam (..)+ , HasFilterLevelParam (..)+ , HasStallWarningsParam (..)+ , HasRepliesParam (..) , HasUntilParam (..) , HasSkipStatusParam (..) , HasFollowParam (..)@@ -71,7 +75,11 @@ defineHasParamClassBool "display_coordinates" defineHasParamClassBool "possibly_sensitive" defineHasParamClassString "lang"+defineHasParamClassString "language" defineHasParamClassString "locale"+defineHasParamClassString "filter_level"+defineHasParamClassBool "stall_warnings"+defineHasParamClassString "replies" defineHasParamClassDay "until" defineHasParamClassBool "skip_status" defineHasParamClassBool "follow"
Web/Twitter/Conduit/Stream.hs view
@@ -1,7 +1,9 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE EmptyDataDecls #-} {-# LANGUAGE CPP #-}+{-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE ConstraintKinds #-}+{-# LANGUAGE FlexibleInstances #-} module Web.Twitter.Conduit.Stream (@@ -24,6 +26,7 @@ import Web.Twitter.Conduit.Monad import Web.Twitter.Types import Web.Twitter.Conduit.Parameters+import Web.Twitter.Conduit.Parameters.TH import Web.Twitter.Conduit.Request import Web.Twitter.Conduit.Response @@ -61,6 +64,12 @@ data Userstream userstream :: APIRequest Userstream StreamingAPI userstream = APIRequestGet "https://userstream.twitter.com/1.1/user.json" []+deriveHasParamInstances ''Userstream+ [ "language"+ , "filter_level"+ , "stall_warnings"+ , "replies"+ ] statusesFilterEndpoint :: String statusesFilterEndpoint = "https://stream.twitter.com/1.1/statuses/filter.json"@@ -74,3 +83,9 @@ -> APIRequest StatusesFilter StreamingAPI statusesFilterByTrack keyword = APIRequestPost statusesFilterEndpoint [("track", PVString keyword)]++deriveHasParamInstances ''StatusesFilter+ [ "language"+ , "filter_level"+ , "stall_warnings"+ ]
twitter-conduit.cabal view
@@ -1,5 +1,5 @@ name: twitter-conduit-version: 0.0.6+version: 0.0.7 license: BSD3 license-file: LICENSE author: HATTORI Hiroki, Hideyuki Tanaka, Takahiro HIMURA