From a9eb2de22dd38aa8ddf28cf1dd3f7ee4f31db8e5 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 11 Nov 2009 17:28:53 -0600 Subject: [PATCH] messed up inauguration-day --- extra/calendar/holidays/us/us.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/calendar/holidays/us/us.factor b/extra/calendar/holidays/us/us.factor index f60f2163c2..7b3a7ea570 100644 --- a/extra/calendar/holidays/us/us.factor +++ b/extra/calendar/holidays/us/us.factor @@ -16,7 +16,7 @@ SYNTAX: us-federal january 3 monday-of-month ; us-federal : inauguration-day ( timestamp/n -- timestamp ) - year dup 4 mod + january 20 >>day ; us-federal + year dup neg 4 rem + january 20 >>day ; us-federal : washington's-birthday ( timestamp/n -- timestamp ) february 3 monday-of-month ; us-federal