diff --git a/yesod-core/Yesod/Core/Class/Handler.hs b/yesod-core/Yesod/Core/Class/Handler.hs index dc0bf920..9890511a 100644 --- a/yesod-core/Yesod/Core/Class/Handler.hs +++ b/yesod-core/Yesod/Core/Class/Handler.hs @@ -24,7 +24,7 @@ import Control.Monad.Trans.Identity ( IdentityT) import Control.Monad.Trans.List ( ListT ) import Control.Monad.Trans.Maybe ( MaybeT ) import Control.Monad.Trans.Error ( ErrorT, Error) -#if __GLASGOW_HASKELL__ >= 710 +#if MIN_VERSION_transformers(0,4,0) import Control.Monad.Trans.Except ( ExceptT ) #endif import Control.Monad.Trans.Reader ( ReaderT ) @@ -58,7 +58,7 @@ GO(IdentityT) GO(ListT) GO(MaybeT) GOX(Error e, ErrorT e) -#if __GLASGOW_HASKELL__ >= 710 +#if MIN_VERSION_transformers(0,4,0) GO(ExceptT e) #endif GO(ReaderT r) @@ -84,7 +84,7 @@ GO(IdentityT) GO(ListT) GO(MaybeT) GOX(Error e, ErrorT e) -#if __GLASGOW_HASKELL__ >= 710 +#if MIN_VERSION_transformers(0,4,0) GO(ExceptT e) #endif GO(ReaderT r)