avoid TH stuff on Android

This commit is contained in:
Joey Hess 2013-04-15 13:32:55 -04:00
parent c172bf7092
commit 04b58f8376

View file

@ -16,6 +16,7 @@ import Data.Default (def)
import Text.Hamlet
#endif
#ifndef __ANDROID__
widgetFile :: String -> Q Exp
#if ! MIN_VERSION_yesod_default(1,1,0)
widgetFile = widgetFileNoReload
@ -26,6 +27,7 @@ widgetFile = widgetFileNoReload $ def
}
}
#endif
#endif
hamletTemplate :: FilePath -> FilePath
hamletTemplate f = globFile "hamlet" f