diff options
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 |