ig 0.6.1 → 0.7
raw patch · 3 files changed
+12/−4 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Instagram: FollowerList :: Scope
+ Instagram: PublicContent :: Scope
Files
- ig.cabal +1/−1
- src/Instagram/Auth.hs +1/−1
- src/Instagram/Types.hs +10/−2
ig.cabal view
@@ -1,5 +1,5 @@ name: ig-version: 0.6.1+version: 0.7 synopsis: Bindings to Instagram's API. homepage: https://github.com/prowdsponsor/ig license: BSD3
src/Instagram/Auth.hs view
@@ -35,7 +35,7 @@ buildQuery cid=[("client_id",cid),("redirect_uri",TE.encodeUtf8 url),("response_type","code")] buildScopes :: [Scope] -> HT.SimpleQuery buildScopes []=[]- buildScopes l =[("scope",BS.intercalate "+" $ map (TE.encodeUtf8 . toLower . pack . show) l)]+ buildScopes l =[("scope",BS.intercalate "+" $ map (TE.encodeUtf8 . pack . show) l)] -- | second step of authorization: get the access token once the user has been redirected with a code getUserAccessTokenURL2 :: (MonadBaseControl IO m, MonadResource m) =>
src/Instagram/Types.hs view
@@ -166,8 +166,16 @@ ] -- | the scopes of the authentication-data Scope=Basic | Comments | Relationships | Likes- deriving (Show,Read,Eq,Ord,Enum,Bounded,Typeable)+data Scope = Basic | PublicContent | FollowerList | Comments | Relationships | Likes+ deriving (Read,Eq,Ord,Enum,Bounded,Typeable)++instance Show Scope where+ show Basic = "basic"+ show PublicContent = "public_content"+ show FollowerList = "follower_list"+ show Comments = "comments"+ show Relationships = "relationships"+ show Likes = "likes" -- | an error returned to us by Instagram data IGError = IGError {