From 35d18b31ff81968e57641d9291d1111818005c98 Mon Sep 17 00:00:00 2001 From: Michael Snoyman Date: Sun, 23 Oct 2011 15:40:05 +0200 Subject: [PATCH] Proper QQ in Settings --- yesod/scaffold/Settings.hs.cg | 2 +- yesod/scaffold/tiny/Settings.hs.cg | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/yesod/scaffold/Settings.hs.cg b/yesod/scaffold/Settings.hs.cg index 37d07341..ad7edac5 100644 --- a/yesod/scaffold/Settings.hs.cg +++ b/yesod/scaffold/Settings.hs.cg @@ -42,7 +42,7 @@ staticDir = "static" -- -- To see how this value is used, see urlRenderOverride in Foundation.hs staticRoot :: AppConfig DefaultEnv -> Text -staticRoot conf = [st|#{appRoot conf}/static|] +staticRoot conf = [~qq~st|#{appRoot conf}/static|] -- The rest of this file contains settings which rarely need changing by a diff --git a/yesod/scaffold/tiny/Settings.hs.cg b/yesod/scaffold/tiny/Settings.hs.cg index fdc06d96..5deb3cc7 100644 --- a/yesod/scaffold/tiny/Settings.hs.cg +++ b/yesod/scaffold/tiny/Settings.hs.cg @@ -35,7 +35,7 @@ staticDir = "static" -- -- To see how this value is used, see urlRenderOverride in ~project~.hs staticRoot :: AppConfig DefaultEnv -> Text -staticRoot conf = [st|#{appRoot conf}/static|] +staticRoot conf = [~qq~st|#{appRoot conf}/static|] widgetFile :: String -> Q Exp #if PRODUCTION