haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

http-conduit 1.6 (snoyberg/http-conduit#44)

Browse Source
This commit is contained in:
Michael Snoyman 2012-08-15 17:48:40 +03:00
parent be48b67fbc
commit ee4f89f053
2 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
authenticate/OpenId2/Discovery.hs
View File

@ -1,5 +1,6 @@
{-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE CPP #-}
-------------------------------------------------------------------------------- --------------------------------------------------------------------------------
-- | -- |
@ -69,7 +70,10 @@ discoverYADIS :: (MonadResource m, MonadBaseControl IO m)
-> Int -- ^ remaining redirects -> Int -- ^ remaining redirects
-> Manager -> Manager
-> m (Maybe (Provider, Identifier, IdentType)) -> m (Maybe (Provider, Identifier, IdentType))
discoverYADIS _ _ 0 _ = liftIO $ throwIO TooManyRedirects discoverYADIS _ _ 0 _ = liftIO $ throwIO $ TooManyRedirects
#if MIN_VERSION_http_conduit(1,6,0)
[]
#endif
discoverYADIS ident mb_loc redirects manager = do discoverYADIS ident mb_loc redirects manager = do
let uri = fromMaybe (unpack $ identifier ident) mb_loc let uri = fromMaybe (unpack $ identifier ident) mb_loc
req <- liftIO $ parseUrl uri req <- liftIO $ parseUrl uri

4
authenticate/authenticate.cabal
View File

@ -1,5 +1,5 @@
name: authenticate name: authenticate
version: 1.3.0.1 version: 1.3.1
license: BSD3 license: BSD3
license-file: LICENSE license-file: LICENSE
author: Michael Snoyman, Hiromi Ishii, Arash Rouhani author: Michael Snoyman, Hiromi Ishii, Arash Rouhani
@ -18,7 +18,7 @@ homepage: http://github.com/yesodweb/authenticate
library library
build-depends: base >= 4 && < 5 build-depends: base >= 4 && < 5
, aeson >= 0.5 , aeson >= 0.5
, http-conduit >= 1.5 && < 1.6 , http-conduit >= 1.5 && < 1.7
, tagsoup >= 0.12 && < 0.13 , tagsoup >= 0.12 && < 0.13
, transformers >= 0.1 && < 0.4 , transformers >= 0.1 && < 0.4
, bytestring >= 0.9 , bytestring >= 0.9