From a26ad237dd087296c8533950d9cb4a69ff94f72e Mon Sep 17 00:00:00 2001 From: Greg Weber Date: Wed, 8 Feb 2012 17:35:59 -0800 Subject: [PATCH] derive Show for Extra --- yesod/scaffold/Settings.hs.cg | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/yesod/scaffold/Settings.hs.cg b/yesod/scaffold/Settings.hs.cg index a8810dd0..2e4f7794 100644 --- a/yesod/scaffold/Settings.hs.cg +++ b/yesod/scaffold/Settings.hs.cg @@ -45,7 +45,7 @@ staticDir = "static" -- have to make a corresponding change here. -- -- To see how this value is used, see urlRenderOverride in Foundation.hs -staticRoot :: AppConfig DefaultEnv x -> Text +staticRoot :: AppConfig DefaultEnv x -> Text staticRoot conf = [~qq~st|#{appRoot conf}/static|] @@ -62,7 +62,7 @@ widgetFile = Yesod.Default.Util.widgetFileNoReload data Extra = Extra { extraCopyright :: Text , extraAnalytics :: Maybe Text -- ^ Google Analytics - } + } deriving Show parseExtra :: DefaultEnv -> Object -> Parser Extra parseExtra _ o = Extra