From 58fb977276e7e4c5d9640f2cbff89e9e3f3470f4 Mon Sep 17 00:00:00 2001 From: Ross MacLeod Date: Thu, 22 Sep 2016 12:59:54 -0400 Subject: [PATCH] Only emit MonadHandler and MonadWidget instance for ExceptT when GHC version >= 7.10, since that's the first version tied to transformers-0.4.0.0 which introduced ExceptT --- yesod-core/Yesod/Core/Class/Handler.hs | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/yesod-core/Yesod/Core/Class/Handler.hs b/yesod-core/Yesod/Core/Class/Handler.hs index bd4788c3..8b4b822d 100644 --- a/yesod-core/Yesod/Core/Class/Handler.hs +++ b/yesod-core/Yesod/Core/Class/Handler.hs @@ -56,7 +56,9 @@ GO(IdentityT) GO(ListT) GO(MaybeT) GOX(Error e, ErrorT e) +#if __GLASGOW_HASKELL__ >= 710 GO(ExceptT e) +#endif GO(ReaderT r) GO(StateT s) GOX(Monoid w, WriterT w) @@ -80,7 +82,9 @@ GO(IdentityT) GO(ListT) GO(MaybeT) GOX(Error e, ErrorT e) +#if __GLASGOW_HASKELL__ >= 710 GO(ExceptT e) +#endif GO(ReaderT r) GO(StateT s) GOX(Monoid w, WriterT w)