Modified expose list.

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

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

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

View File

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

View File

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