Proper QQ in Settings
This commit is contained in:
parent
8a015f25f3
commit
35d18b31ff
@ -42,7 +42,7 @@ staticDir = "static"
|
|||||||
--
|
--
|
||||||
-- To see how this value is used, see urlRenderOverride in Foundation.hs
|
-- To see how this value is used, see urlRenderOverride in Foundation.hs
|
||||||
staticRoot :: AppConfig DefaultEnv -> Text
|
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
|
-- The rest of this file contains settings which rarely need changing by a
|
||||||
|
|||||||
@ -35,7 +35,7 @@ staticDir = "static"
|
|||||||
--
|
--
|
||||||
-- To see how this value is used, see urlRenderOverride in ~project~.hs
|
-- To see how this value is used, see urlRenderOverride in ~project~.hs
|
||||||
staticRoot :: AppConfig DefaultEnv -> Text
|
staticRoot :: AppConfig DefaultEnv -> Text
|
||||||
staticRoot conf = [st|#{appRoot conf}/static|]
|
staticRoot conf = [~qq~st|#{appRoot conf}/static|]
|
||||||
|
|
||||||
widgetFile :: String -> Q Exp
|
widgetFile :: String -> Q Exp
|
||||||
#if PRODUCTION
|
#if PRODUCTION
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user