haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

derive Show for Extra

Browse Source
This commit is contained in:
Greg Weber 2012-02-08 17:35:59 -08:00
parent b7924975b0
commit a26ad237dd
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
yesod/scaffold/Settings.hs.cg
View File

@ -45,7 +45,7 @@ staticDir = "static"
-- have to make a corresponding change here. -- have to make a corresponding change here.
-- --
-- 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 x -> Text staticRoot :: AppConfig DefaultEnv x -> Text
staticRoot conf = [~qq~st|#{appRoot conf}/static|] staticRoot conf = [~qq~st|#{appRoot conf}/static|]
@ -62,7 +62,7 @@ widgetFile = Yesod.Default.Util.widgetFileNoReload
data Extra = Extra data Extra = Extra
{ extraCopyright :: Text { extraCopyright :: Text
, extraAnalytics :: Maybe Text -- ^ Google Analytics , extraAnalytics :: Maybe Text -- ^ Google Analytics
} } deriving Show
parseExtra :: DefaultEnv -> Object -> Parser Extra parseExtra :: DefaultEnv -> Object -> Parser Extra
parseExtra _ o = Extra parseExtra _ o = Extra