Removed some dependencies
This commit is contained in:
parent
a7cfa5f667
commit
3661d96f0b
@ -39,8 +39,9 @@ import Yesod.Rep
|
|||||||
import Control.Exception hiding (Handler)
|
import Control.Exception hiding (Handler)
|
||||||
import Control.Applicative
|
import Control.Applicative
|
||||||
|
|
||||||
import Control.Monad.Writer
|
import Control.Monad.Trans
|
||||||
import Control.Monad.Attempt
|
import Control.Monad.Attempt
|
||||||
|
import Control.Monad (liftM, ap)
|
||||||
|
|
||||||
import System.IO
|
import System.IO
|
||||||
import Data.Object.Html
|
import Data.Object.Html
|
||||||
|
|||||||
@ -24,13 +24,11 @@ import qualified Hack
|
|||||||
import Web.Encodings
|
import Web.Encodings
|
||||||
import qualified Web.Authenticate.Rpxnow as Rpxnow
|
import qualified Web.Authenticate.Rpxnow as Rpxnow
|
||||||
import qualified Web.Authenticate.OpenId as OpenId
|
import qualified Web.Authenticate.OpenId as OpenId
|
||||||
import Data.Enumerable
|
|
||||||
|
|
||||||
import Yesod
|
import Yesod
|
||||||
import Yesod.Constants
|
import Yesod.Constants
|
||||||
|
|
||||||
import Control.Applicative ((<$>), Applicative (..))
|
import Control.Applicative ((<$>), Applicative (..))
|
||||||
import Control.Monad.Reader
|
|
||||||
import Control.Monad.Attempt
|
import Control.Monad.Attempt
|
||||||
|
|
||||||
import Data.Maybe (fromMaybe)
|
import Data.Maybe (fromMaybe)
|
||||||
@ -42,17 +40,7 @@ data AuthResource =
|
|||||||
| OpenidForward
|
| OpenidForward
|
||||||
| OpenidComplete
|
| OpenidComplete
|
||||||
| LoginRpxnow
|
| LoginRpxnow
|
||||||
deriving Show
|
deriving (Show, Eq, Enum, Bounded)
|
||||||
|
|
||||||
instance Enumerable AuthResource where
|
|
||||||
enumerate =
|
|
||||||
[ Check
|
|
||||||
, Logout
|
|
||||||
, Openid
|
|
||||||
, OpenidForward
|
|
||||||
, OpenidComplete
|
|
||||||
, LoginRpxnow
|
|
||||||
]
|
|
||||||
|
|
||||||
newtype RpxnowApiKey = RpxnowApiKey String
|
newtype RpxnowApiKey = RpxnowApiKey String
|
||||||
|
|
||||||
|
|||||||
@ -35,16 +35,13 @@ library
|
|||||||
hack == 2009.10.30,
|
hack == 2009.10.30,
|
||||||
split >= 0.1.1 && < 0.2,
|
split >= 0.1.1 && < 0.2,
|
||||||
authenticate >= 0.4.0 && < 0.5,
|
authenticate >= 0.4.0 && < 0.5,
|
||||||
data-default >= 0.2 && < 0.3,
|
|
||||||
predicates >= 0.1 && < 0.2,
|
predicates >= 0.1 && < 0.2,
|
||||||
bytestring >= 0.9.1.4 && < 0.10,
|
bytestring >= 0.9.1.4 && < 0.10,
|
||||||
web-encodings >= 0.2.0 && < 0.3,
|
web-encodings >= 0.2.0 && < 0.3,
|
||||||
data-object >= 0.2.0 && < 0.3,
|
data-object >= 0.2.0 && < 0.3,
|
||||||
data-object-yaml >= 0.0.0 && < 0.1,
|
data-object-yaml >= 0.0.0 && < 0.1,
|
||||||
enumerable >= 0.0.3 && < 0.1,
|
|
||||||
directory >= 1 && < 1.1,
|
directory >= 1 && < 1.1,
|
||||||
transformers >= 0.1.4.0 && < 0.2,
|
transformers >= 0.1.4.0 && < 0.2,
|
||||||
monads-fd >= 0.0.0.1 && < 0.1,
|
|
||||||
control-monad-attempt >= 0.0.0 && < 0.1,
|
control-monad-attempt >= 0.0.0 && < 0.1,
|
||||||
syb,
|
syb,
|
||||||
text >= 0.5 && < 0.6,
|
text >= 0.5 && < 0.6,
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user