diff --git a/yesod/Yesod/Default/Config.hs b/yesod/Yesod/Default/Config.hs index dba3889d..6e2dbf45 100644 --- a/yesod/Yesod/Default/Config.hs +++ b/yesod/Yesod/Default/Config.hs @@ -15,7 +15,7 @@ module Yesod.Default.Config , withYamlEnvironment ) where -import Data.Char (toUpper, toLower) +import Data.Char (toUpper) import Data.Text (Text) import qualified Data.Text as T import Data.Yaml diff --git a/yesod/Yesod/Default/Config2.hs b/yesod/Yesod/Default/Config2.hs index fed812b9..e477d216 100644 --- a/yesod/Yesod/Default/Config2.hs +++ b/yesod/Yesod/Default/Config2.hs @@ -20,7 +20,11 @@ module Yesod.Default.Config2 , requireCustomEnv ) where + +#if __GLASGOW_HASKELL__ < 710 +import Control.Applicative ((<$>)) import Data.Monoid +#endif import Data.Semigroup import Data.List.NonEmpty (nonEmpty) import Data.Aeson @@ -28,7 +32,6 @@ import qualified Data.HashMap.Strict as H import Data.Text (Text, pack) import System.Environment (getEnvironment, getArgs) import Control.Arrow ((***)) -import Control.Applicative ((<$>)) import Control.Monad (forM) import Control.Exception (throwIO) import Data.Text.Encoding (encodeUtf8)