diff --git a/yesod/ChangeLog.md b/yesod/ChangeLog.md index dd2fe0b0..4929bf12 100644 --- a/yesod/ChangeLog.md +++ b/yesod/ChangeLog.md @@ -1,5 +1,9 @@ # ChangeLog for yesod +## 1.6.1.2 + +* Fix compatibility with template-haskell 2.17 [#1730](https://github.com/yesodweb/yesod/pull/1730) + ## 1.6.1.1 * Allow yesod-form 1.7 diff --git a/yesod/Yesod/Default/Util.hs b/yesod/Yesod/Default/Util.hs index e0d6ae1a..20514139 100644 --- a/yesod/Yesod/Default/Util.hs +++ b/yesod/Yesod/Default/Util.hs @@ -113,7 +113,11 @@ combine func file isReload tls = do , show file , ", but no templates were found." ] +#if MIN_VERSION_template_haskell(2,17,0) + exps -> return $ DoE Nothing $ map NoBindS exps +#else exps -> return $ DoE $ map NoBindS exps +#endif where qmexps :: Q [Maybe Exp] qmexps = mapM go tls diff --git a/yesod/yesod.cabal b/yesod/yesod.cabal index 2b0ef5b8..4da584e1 100644 --- a/yesod/yesod.cabal +++ b/yesod/yesod.cabal @@ -1,5 +1,5 @@ name: yesod -version: 1.6.1.1 +version: 1.6.1.2 license: MIT license-file: LICENSE author: Michael Snoyman