srid/rib
1
1
Fork 0
mirror of https://github.com/srid/rib.git synced 2024-11-26 04:15:35 +03:00
Code Issues Projects Releases Wiki Activity

Run ormolu

Browse Source
This commit is contained in:
Sridhar Ratnakumar 2020-05-11 22:27:24 -04:00
parent 4b3d374aec
commit c623ff953d
1 changed files with 16 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Rib/Extra/OpenGraph.hs
View File

@ -21,8 +21,7 @@ import qualified Text.URI as URI
-- The OpenGraph metadata -- The OpenGraph metadata
-- --
-- This type can be directly rendered to HTML using `toHTML`. -- This type can be directly rendered to HTML using `toHTML`.
data OpenGraph data OpenGraph = OpenGraph
= OpenGraph
{ _openGraph_title :: Text, { _openGraph_title :: Text,
_openGraph_url :: Maybe URI.URI, _openGraph_url :: Maybe URI.URI,
_openGraph_author :: Maybe Text, _openGraph_author :: Maybe Text,
@ -66,8 +65,7 @@ instance ToHtml OGType where
metaOg "type" "website" metaOg "type" "website"
-- TODO: _article_profile :: [Profile] -- TODO: _article_profile :: [Profile]
data Article data Article = Article
= Article
{ _article_section :: Maybe Text, { _article_section :: Maybe Text,
_article_modifiedTime :: Maybe UTCTime, _article_modifiedTime :: Maybe UTCTime,
_article_publishedTime :: Maybe UTCTime, _article_publishedTime :: Maybe UTCTime,