Removed some dependencies

This commit is contained in:
Michael Snoyman 2009-12-17 19:55:29 +02:00
parent a7cfa5f667
commit 3661d96f0b
3 changed files with 3 additions and 17 deletions

View File

@ -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

View File

@ -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

View File

@ -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,