haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix compatibility with template-haskell 2.17 for yesod

Browse Source
This commit is contained in:
Felix Yan 2021-06-30 18:07:24 +08:00
parent 9edbc05827
commit 189487914d
No known key found for this signature in database
GPG Key ID: 786C63F330D7CB92
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
yesod/Yesod/Default/Util.hs
View File

@ -113,7 +113,11 @@ combine func file isReload tls = do
, show file , show file
, ", but no templates were found." , ", 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 exps -> return $ DoE $ map NoBindS exps
#endif
where where
qmexps :: Q [Maybe Exp] qmexps :: Q [Maybe Exp]
qmexps = mapM go tls qmexps = mapM go tls