Depend directly on template-haskell.
This commit is contained in:
parent
4897c24d3f
commit
42ec7f53e9
@ -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]
|
||||
|
||||
Loading…
Reference in New Issue
Block a user