derive Show for Extra
This commit is contained in:
parent
b7924975b0
commit
a26ad237dd
@ -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
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user