calendar: rename time* to duration*.

diff --git a/basis/calendar/calendar.factor b/basis/calendar/calendar.factor
index bdedb07227622913df7aa1bb993042cedfa3754e..b791e0a0fa90457add8055ba1d6b91b1d869b381 100644 (file)
--- a/basis/calendar/calendar.factor
+++ b/basis/calendar/calendar.factor
@@ -404,7 +404,7 @@ M: timestamp time-
     ! Exact calendar-time difference
     (time-) seconds ;
 
-: time* ( obj1 obj2 -- obj3 )
+: duration* ( obj1 obj2 -- obj3 )
     dup real? [ swap ] when
     dup real? [ * ] [
         {
@@ -418,7 +418,7 @@ M: timestamp time-
     ] if ;
 
 : before ( duration -- -duration )
-    -1 time* ;
+    -1 duration* ;
 
 : duration- ( duration1 duration2 -- duration3 )
     {