From 379bf455595c2af7edf87a779a7069bd8d47a9d3 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Tue, 2 Sep 2008 12:06:11 -0500
Subject: [PATCH] fix private word

---
 basis/calendar/calendar.factor | 2 --
 1 file changed, 2 deletions(-)

diff --git a/basis/calendar/calendar.factor b/basis/calendar/calendar.factor
index cb0112a3a0..c2c386a790 100755
--- a/basis/calendar/calendar.factor
+++ b/basis/calendar/calendar.factor
@@ -278,12 +278,10 @@ GENERIC: time- ( time1 time2 -- time3 )
 M: timestamp <=> ( ts1 ts2 -- n )
     [ >gmt tuple-slots ] compare ;
 
-<PRIVATE
 : (time-) ( timestamp timestamp -- n )
     [ >gmt ] bi@
     [ [ >date< julian-day-number ] bi@ - 86400 * ] 2keep
     [ >time< >r >r 3600 * r> 60 * r> + + ] bi@ - + ;
-PRIVATE>
 
 M: timestamp time-
     #! Exact calendar-time difference