Support GHC 7.10

- Conditionally import Control.Applicative
- Enable FlexibleContexts
This commit is contained in:
patrick brisbin 2015-04-07 11:30:01 -04:00
parent 44a83b6c6a
commit ad0e354b2b
No known key found for this signature in database
GPG Key ID: DB04E2CE780A17DE
5 changed files with 21 additions and 4 deletions

View File

@ -1,4 +1,6 @@
{-# LANGUAGE CPP #-}
{-# LANGUAGE DeriveDataTypeable #-} {-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE QuasiQuotes #-} {-# LANGUAGE QuasiQuotes #-}
-- | -- |
@ -14,7 +16,10 @@ module Yesod.Auth.OAuth2
, module Network.OAuth.OAuth2 , module Network.OAuth.OAuth2
) where ) where
#if __GLASGOW_HASKELL__ < 710
import Control.Applicative ((<$>)) import Control.Applicative ((<$>))
#endif
import Control.Exception.Lifted import Control.Exception.Lifted
import Control.Monad.IO.Class import Control.Monad.IO.Class
import Data.ByteString (ByteString) import Data.ByteString (ByteString)

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
-- | -- |
-- --
@ -13,7 +14,10 @@ module Yesod.Auth.OAuth2.Github
, module Yesod.Auth.OAuth2 , module Yesod.Auth.OAuth2
) where ) where
import Control.Applicative ((<$>), (<*>)) #if __GLASGOW_HASKELL__ < 710
import Control.Applicative ((<$>), (<*>), pure)
#endif
import Control.Exception.Lifted import Control.Exception.Lifted
import Control.Monad (mzero) import Control.Monad (mzero)
import Data.Aeson import Data.Aeson

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
-- | -- |
-- --
@ -8,7 +9,10 @@ module Yesod.Auth.OAuth2.Spotify
, module Yesod.Auth.OAuth2 , module Yesod.Auth.OAuth2
) where ) where
import Control.Applicative ((<$>), (<*>)) #if __GLASGOW_HASKELL__ < 710
import Control.Applicative ((<$>), (<*>), pure)
#endif
import Control.Exception.Lifted import Control.Exception.Lifted
import Control.Monad (mzero) import Control.Monad (mzero)
import Data.Aeson import Data.Aeson

View File

@ -1,3 +1,4 @@
{-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
-- | -- |
-- --
@ -12,7 +13,10 @@ module Yesod.Auth.OAuth2.Upcase
, module Yesod.Auth.OAuth2 , module Yesod.Auth.OAuth2
) where ) where
import Control.Applicative ((<$>), (<*>)) #if __GLASGOW_HASKELL__ < 710
import Control.Applicative ((<$>), (<*>), pure)
#endif
import Control.Exception.Lifted import Control.Exception.Lifted
import Control.Monad (mzero) import Control.Monad (mzero)
import Data.Aeson import Data.Aeson

View File

@ -34,7 +34,7 @@ library
, text >= 0.7 && < 2.0 , text >= 0.7 && < 2.0
, yesod-form >= 1.3 && < 1.5 , yesod-form >= 1.3 && < 1.5
, transformers >= 0.2.2 && < 0.5 , transformers >= 0.2.2 && < 0.5
, hoauth2 >= 0.4.1 && < 0.5 , hoauth2 >= 0.4.7 && < 0.5
, lifted-base >= 0.2 && < 0.4 , lifted-base >= 0.2 && < 0.4
exposed-modules: Yesod.Auth.OAuth2 exposed-modules: Yesod.Auth.OAuth2