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

Fix all warnings

Browse Source
This commit is contained in:
Michael Snoyman 2012-01-10 12:13:26 +02:00
parent 2a903feca1
commit 07a408951b
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Web/Authenticate/OAuth.hs
View File

@ -62,6 +62,12 @@ newOAuth :: OAuth
newOAuth = OAuth { oauthSignatureMethod = HMACSHA1 newOAuth = OAuth { oauthSignatureMethod = HMACSHA1
, oauthCallback = Nothing , oauthCallback = Nothing
, oauthRealm = Nothing , oauthRealm = Nothing
, oauthServerName = error "oauthServerName"
, oauthRequestUri = error "oauthRequestUri"
, oauthAccessTokenUri = error "oauthAccessTokenUri"
, oauthAuthorizeUri = error "oauthAuthorizeUri"
, oauthConsumerKey = error "oauthConsumerKey"
, oauthConsumerSecret = error "oauthConsumerSecret"
} }
-- | Data type for signature method. -- | Data type for signature method.

2
Web/Authenticate/OpenId.hs
View File

@ -17,7 +17,7 @@ import Data.Text.Encoding.Error (lenientDecode)
import Data.Text.Lazy (toStrict) import Data.Text.Lazy (toStrict)
import Network.HTTP.Conduit import Network.HTTP.Conduit
( parseUrl, urlEncodedBody, responseBody, httpLbs ( parseUrl, urlEncodedBody, responseBody, httpLbs
, HttpException, Manager , Manager
) )
import Data.Conduit (ResourceT, ResourceIO) import Data.Conduit (ResourceT, ResourceIO)
import Control.Arrow ((***), second) import Control.Arrow ((***), second)