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

Modified expose list.

Browse Source
This commit is contained in:
Hiromi Ishii 2012-02-03 18:29:08 +09:00
parent d68d7b0d72
commit 3a7d5d3a05
3 changed files with 16 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
authenticate-oauth/.gitignore vendored Normal file
View File

@ -0,0 +1,4 @@
.DS_Store
*.hi
*.o
dist

23
authenticate-oauth/Web/Authenticate/OAuth.hs
View File

@ -2,10 +2,10 @@
{-# OPTIONS_GHC -Wall -fno-warn-orphans #-}
module Web.Authenticate.OAuth
( -- * Data types
OAuth(oauthServerName, oauthRequestUri, oauthAccessTokenUri, oauthAuthorizeUri,
oauthSignatureMethod, oauthConsumerKey, oauthConsumerSecret, oauthCallback,
oauthRealm),
def, newOAuth, SignMethod(..), Credential(..), OAuthException(..),
OAuth, def, newOAuth, oauthServerName, oauthRequestUri, oauthAccessTokenUri,
oauthAuthorizeUri, oauthSignatureMethod, oauthConsumerKey,
oauthConsumerSecret, oauthCallback, oauthRealm,
SignMethod(..), Credential(..), OAuthException(..),
-- * Operations for credentials
newCredential, emptyCredential, insert, delete, inserts,
-- * Signature
@ -53,19 +53,18 @@ import Data.Default
-- Instead, you should use the 'def' method or 'newOAuth' function to retrieve a default instance,
-- and then use the records below to make modifications.
-- This approach allows us to add configuration options without breaking backwards compatibility.
data OAuth = OAuth { oauthServerName :: String
-- ^ Service name (default: @""@)
data OAuth = OAuth { oauthServerName :: String -- ^ Service name (default: @\"\"@)
, oauthRequestUri :: String
-- ^ URI to request temporary credential (default: @""@).
-- You MUST specify if you use 'getTemporaryCredential\'', 'getTemporaryCredentialProxy'
-- ^ URI to request temporary credential (default: @\"\"@).
-- You MUST specify if you use 'getTemporaryCredential'', 'getTemporaryCredentialProxy'
-- or 'getTemporaryCredential'; otherwise you can just leave this empty.
, oauthAccessTokenUri :: String
-- ^ Uri to obtain access token (default: @""@).
-- You MUST specify if you use 'getAcessToken' or 'getAccessToken\'';
-- ^ Uri to obtain access token (default: @\"\"@).
-- You MUST specify if you use 'getAcessToken' or 'getAccessToken'';
-- otherwise you can just leave this empty.
, oauthAuthorizeUri :: String
-- ^ Uri to authorize (default: @""@).
-- You MUST specify if you use 'authorizeUrl' or 'authorizeUrl\'';
-- ^ Uri to authorize (default: @\"\"@).
-- You MUST specify if you use 'authorizeUrl' or 'authorizeUrl'';
-- otherwise you can just leave this empty.
, oauthSignatureMethod :: SignMethod
-- ^ Signature Method (default: 'HMACSHA1')

2
authenticate-oauth/authenticate-oauth.cabal
View File

@ -1,5 +1,5 @@
name: authenticate-oauth
version: 1.0.0
version: 1.0.0.1
license: BSD3
license-file: LICENSE
author: Hiromi Ishii