srid/rib
1
1
Fork 0
mirror of https://github.com/srid/rib.git synced 2024-11-22 11:23:02 +03:00
Code Issues Projects Releases Wiki Activity

Allow an older version of time

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

3
rib.cabal
View File

@ -56,7 +56,8 @@ common library-common
safe-exceptions,
shake >= 0.18.5,
text >=1.2.3 && <1.3,
time >= 1.9,
time,
iso8601-time,
wai >=3.2.2 && <3.3,
wai-app-static >=3.1.6 && <3.2,
warp

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

@ -12,7 +12,7 @@ module Rib.Extra.OpenGraph
where
import Data.Time (UTCTime)
import Data.Time.Format.ISO8601 (formatShow, iso8601Format)
import Data.Time.ISO8601 (formatISO8601)
import Lucid
import Lucid.Base (makeAttribute)
import Relude
@ -84,7 +84,7 @@ instance ToHtml Article where
metaOg "article:tag" `mapM_` _article_tag
where
metaOgTime k t =
metaOg k $ toText $ formatShow iso8601Format t
metaOg k $ toText $ formatISO8601 t
-- Open graph meta element
metaOg :: Applicative m => Text -> Text -> HtmlT m ()