Depend directly on template-haskell.

This commit is contained in:
Daniel Díaz 2015-08-11 22:10:12 +02:00
parent 4897c24d3f
commit 42ec7f53e9

View File

@ -96,7 +96,7 @@ mkYesodGeneral name args isSub resS = do
Left t -> ( ConT (mkName t):xs, n:ns, cs )
Right ts -> ( VarT n :xs, ns
, fmap (\t ->
#if MIN_VERSION_base(4,8,0)
#if MIN_VERSION_template_haskell(2,10,0)
AppT (ConT $ mkName t) (VarT n)
#else
ClassP (mkName t) [VarT n]