From 469f4314df05142ec53e6148a092e5d6be2575b8 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Wed, 19 Oct 2011 10:34:50 -0700
Subject: [PATCH] calendar: removing unused (month-name) word.

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

diff --git a/basis/calendar/calendar.factor b/basis/calendar/calendar.factor
index 7e9512d046..0742b429f6 100644
--- a/basis/calendar/calendar.factor
+++ b/basis/calendar/calendar.factor
@@ -64,12 +64,6 @@ CONSTANT: month-names
         "July" "August" "September" "October" "November" "December"
     }
 
-<PRIVATE
-
-: (month-name) ( n -- string ) 1 - month-names nth ;
-
-PRIVATE>
-
 GENERIC: month-name ( obj -- string )
 
 M: integer month-name check-month 1 - month-names nth ;