reddit: use calendar.elapsed for relative-time.

diff --git a/extra/reddit/reddit.factor b/extra/reddit/reddit.factor
index 20f607081c26da58ba408438cbf8d29fd6a6f252..804e8ed35f4be6b12dbdb9e6c311d915d2653132 100644 (file)
--- a/extra/reddit/reddit.factor
+++ b/extra/reddit/reddit.factor
@@ -1,9 +1,10 @@
 ! Copyright (C) 2011-2012 John Benediktsson
 ! See http://factorcode.org/license.txt for BSD license
 
-USING: accessors assocs calendar colors.constants colors.hex
-combinators formatting fry http.client io io.styles json
-json.reader kernel make math math.statistics sequences urls ;
+USING: accessors assocs calendar calendar.elapsed
+colors.constants colors.hex combinators formatting fry
+http.client io io.styles json json.reader kernel make math
+math.statistics sequences urls ;
 
 IN: reddit
 
@@ -104,8 +105,8 @@ PRIVATE>
                 [ story>comments-url ] bi write-link
             ]
             [
-                "created_utc" of unix-time>timestamp now swap time-
-                duration>hours ", posted %d hours ago" sprintf write-text
+                "created_utc" of now timestamp>unix-time swap -
+                relative-time ", posted " write-text write-text
             ]
             [ " by " write-text [ "author" of ] [ story>author-url ] bi write-link nl nl ]
         } cleave