浏览代码

a tiny bit of docs for PrettyDate

which maybe should be RelativeDate? or maybe even RelativeTime, because
it isn't concerned with dates at all. mhh...
Lucas Stadler 11 年之前
父节点
当前提交
decd8e4db4
共有 1 个文件被更改,包括 6 次插入0 次删除
  1. 6 0
      elm/PrettyDate.elm

+ 6 - 0
elm/PrettyDate.elm

@ -1,8 +1,14 @@
1 1
module PrettyDate (prettyDate) where
2 2
3
{-| Relative time formatting.
4
5
Supports both dates in the past and in the future.
6
 -}
7
3 8
import Date
4 9
import Date (Date)
5 10
11
{-| Format the second date relative to the first one. -}
6 12
prettyDate : Date -> Date -> String
7 13
prettyDate reference date =
8 14
    let referenceSeconds = Date.toTime reference