Remove "Helpers"

This commit is contained in:
Michael Snoyman 2011-05-01 22:14:32 +03:00
parent 4db67d2b2f
commit ba686f16e9
9 changed files with 28 additions and 28 deletions

View File

@ -5,7 +5,7 @@
{-# LANGUAGE RankNTypes #-} {-# LANGUAGE RankNTypes #-}
{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
module Yesod.Helpers.Auth module Yesod.Auth
( -- * Subsite ( -- * Subsite
Auth Auth
, AuthPlugin (..) , AuthPlugin (..)

View File

@ -4,11 +4,11 @@
-- | Provides a dummy authentication module that simply lets a user specify -- | Provides a dummy authentication module that simply lets a user specify
-- his/her identifier. This is not intended for real world use, just for -- his/her identifier. This is not intended for real world use, just for
-- testing. -- testing.
module Yesod.Helpers.Auth.Dummy module Yesod.Auth.Dummy
( authDummy ( authDummy
) where ) where
import Yesod.Helpers.Auth import Yesod.Auth
import Yesod.Form (runFormPost', stringInput) import Yesod.Form (runFormPost', stringInput)
import Yesod.Handler (notFound) import Yesod.Handler (notFound)
import Text.Hamlet (hamlet) import Text.Hamlet (hamlet)

View File

@ -2,7 +2,7 @@
{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE FlexibleContexts #-}
module Yesod.Helpers.Auth.Email module Yesod.Auth.Email
( -- * Plugin ( -- * Plugin
authEmail authEmail
, YesodAuthEmail (..) , YesodAuthEmail (..)
@ -15,7 +15,7 @@ module Yesod.Helpers.Auth.Email
) where ) where
import Network.Mail.Mime (randomString) import Network.Mail.Mime (randomString)
import Yesod.Helpers.Auth import Yesod.Auth
import System.Random import System.Random
import Control.Monad (when) import Control.Monad (when)
import Control.Applicative ((<$>), (<*>)) import Control.Applicative ((<$>), (<*>))

View File

@ -1,12 +1,12 @@
{-# LANGUAGE QuasiQuotes #-} {-# LANGUAGE QuasiQuotes #-}
{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
module Yesod.Helpers.Auth.Facebook module Yesod.Auth.Facebook
( authFacebook ( authFacebook
, facebookUrl , facebookUrl
) where ) where
import Yesod.Helpers.Auth import Yesod.Auth
import qualified Web.Authenticate.Facebook as Facebook import qualified Web.Authenticate.Facebook as Facebook
import Data.Aeson import Data.Aeson
import Data.Aeson.Types (parseMaybe) import Data.Aeson.Types (parseMaybe)

View File

@ -7,7 +7,7 @@
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
------------------------------------------------------------------------------- -------------------------------------------------------------------------------
-- | -- |
-- Module : Yesod.Helpers.Auth.HashDB -- Module : Yesod.Auth.HashDB
-- Copyright : (c) Patrick Brisbin 2010 -- Copyright : (c) Patrick Brisbin 2010
-- License : as-is -- License : as-is
-- --
@ -22,7 +22,7 @@
-- Example usage: -- Example usage:
-- --
-- > -- import the function -- > -- import the function
-- > import Helpers.Auth.HashDB -- > import Auth.HashDB
-- > -- >
-- > -- make sure you have an auth route -- > -- make sure you have an auth route
-- > mkYesodData "MyApp" [$parseRoutes| -- > mkYesodData "MyApp" [$parseRoutes|
@ -57,7 +57,7 @@
-- can be used to get the hash from the commandline. -- can be used to get the hash from the commandline.
-- --
------------------------------------------------------------------------------- -------------------------------------------------------------------------------
module Yesod.Helpers.Auth.HashDB module Yesod.Auth.HashDB
( authHashDB ( authHashDB
, getAuthIdHashDB , getAuthIdHashDB
, UserId , UserId
@ -67,7 +67,7 @@ module Yesod.Helpers.Auth.HashDB
import Yesod.Persist import Yesod.Persist
import Yesod.Handler import Yesod.Handler
import Yesod.Form import Yesod.Form
import Yesod.Helpers.Auth import Yesod.Auth
import Text.Hamlet (hamlet) import Text.Hamlet (hamlet)
import Control.Applicative ((<$>), (<*>)) import Control.Applicative ((<$>), (<*>))

View File

@ -1,12 +1,12 @@
{-# LANGUAGE CPP, QuasiQuotes, OverloadedStrings #-} {-# LANGUAGE CPP, QuasiQuotes, OverloadedStrings #-}
{-# OPTIONS_GHC -fwarn-unused-imports #-} {-# OPTIONS_GHC -fwarn-unused-imports #-}
module Yesod.Helpers.Auth.OAuth module Yesod.Auth.OAuth
( authOAuth ( authOAuth
, oauthUrl , oauthUrl
, authTwitter , authTwitter
, twitterUrl , twitterUrl
) where ) where
import Yesod.Helpers.Auth import Yesod.Auth
import Yesod.Form import Yesod.Form
import Yesod.Handler import Yesod.Handler
import Yesod.Widget import Yesod.Widget

View File

@ -1,12 +1,12 @@
{-# LANGUAGE QuasiQuotes #-} {-# LANGUAGE QuasiQuotes #-}
{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
module Yesod.Helpers.Auth.OpenId module Yesod.Auth.OpenId
( authOpenId ( authOpenId
, forwardUrl , forwardUrl
) where ) where
import Yesod.Helpers.Auth import Yesod.Auth
import qualified Web.Authenticate.OpenId as OpenId import qualified Web.Authenticate.OpenId as OpenId
import Control.Monad.Attempt import Control.Monad.Attempt

View File

@ -1,11 +1,11 @@
{-# LANGUAGE QuasiQuotes #-} {-# LANGUAGE QuasiQuotes #-}
{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
module Yesod.Helpers.Auth.Rpxnow module Yesod.Auth.Rpxnow
( authRpxnow ( authRpxnow
) where ) where
import Yesod.Helpers.Auth import Yesod.Auth
import qualified Web.Authenticate.Rpxnow as Rpxnow import qualified Web.Authenticate.Rpxnow as Rpxnow
import Control.Monad (mplus) import Control.Monad (mplus)

View File

@ -1,5 +1,5 @@
name: yesod-auth name: yesod-auth
version: 0.4.0.1 version: 0.5.0
license: BSD3 license: BSD3
license-file: LICENSE license-file: LICENSE
author: Michael Snoyman, Patrick Brisbin author: Michael Snoyman, Patrick Brisbin
@ -21,7 +21,7 @@ library
build-depends: base >= 4 && < 4.3 build-depends: base >= 4 && < 4.3
build-depends: authenticate >= 0.9 && < 0.10 build-depends: authenticate >= 0.9 && < 0.10
, bytestring >= 0.9.1.4 && < 0.10 , bytestring >= 0.9.1.4 && < 0.10
, yesod-core >= 0.8 && < 0.9 , yesod-core >= 0.8.1 && < 0.9
, wai >= 0.4 && < 0.5 , wai >= 0.4 && < 0.5
, template-haskell , template-haskell
, pureMD5 >= 1.1 && < 2.2 , pureMD5 >= 1.1 && < 2.2
@ -31,7 +31,7 @@ library
, mime-mail >= 0.3 && < 0.4 , mime-mail >= 0.3 && < 0.4
, blaze-html >= 0.4 && < 0.5 , blaze-html >= 0.4 && < 0.5
, yesod-persistent >= 0.1 && < 0.2 , yesod-persistent >= 0.1 && < 0.2
, hamlet >= 0.8 && < 0.9 , hamlet >= 0.8.1 && < 0.9
, yesod-json >= 0.1 && < 0.2 , yesod-json >= 0.1 && < 0.2
, containers >= 0.2 && < 0.5 , containers >= 0.2 && < 0.5
, yesod-form >= 0.1 && < 0.2 , yesod-form >= 0.1 && < 0.2
@ -43,14 +43,14 @@ library
, aeson >= 0.3.2.2 && < 0.4 , aeson >= 0.3.2.2 && < 0.4
, web-routes-quasi >= 0.7 && < 0.8 , web-routes-quasi >= 0.7 && < 0.8
exposed-modules: Yesod.Helpers.Auth exposed-modules: Yesod.Auth
Yesod.Helpers.Auth.Dummy Yesod.Auth.Dummy
Yesod.Helpers.Auth.Email Yesod.Auth.Email
Yesod.Helpers.Auth.Facebook Yesod.Auth.Facebook
Yesod.Helpers.Auth.OpenId Yesod.Auth.OpenId
Yesod.Helpers.Auth.OAuth Yesod.Auth.OAuth
Yesod.Helpers.Auth.Rpxnow Yesod.Auth.Rpxnow
Yesod.Helpers.Auth.HashDB Yesod.Auth.HashDB
ghc-options: -Wall ghc-options: -Wall
source-repository head source-repository head