diff options
author | 2025-02-20 18:27:42 +0100 | |
---|---|---|
committer | 2025-02-20 18:27:42 +0100 | |
commit | 69bd88efdabf9362d2218618a5b0786543961cb3 (patch) | |
tree | 1c389a5e6f9ab3ede93bcaca89b182800e8b4b43 /app/Main.hs | |
parent | 0f27765b2786e390668a9c386b1b40fcb6f274fc (diff) |
show times relatively
Diffstat (limited to 'app/Main.hs')
-rw-r--r-- | app/Main.hs | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/app/Main.hs b/app/Main.hs index d19a08b..a31a84b 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -39,6 +39,7 @@ import Text.Blaze.Html.Renderer.Utf8 import Text.Cassius import Text.Hamlet import Text.Printf +import Text.Time.Pretty (prettyTimeAutoFromNow) import Text.XML.Stream.Render env_REPOSITORIES :: [String] @@ -209,9 +210,9 @@ instance ToMarkup Commit where <p .commit__message>#{message} <div .commit__meta> <span>by - <span>#{author} - <span>on - <span>#{createdAt} + <span>#{author}, + <span> + <span title=#{createdAt}>#{unsafePerformIO (prettyTimeAutoFromNow createdAt)} |] instance ToMarkup Day where |