From 39051694bd3b493182f2693e9a4cc9abea49f991 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Sat, 18 Jan 2020 12:23:01 +0000 Subject: Change the start year to 2020 --- src/date-utils.scm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/date-utils.scm b/src/date-utils.scm index b977f13..114f7b7 100644 --- a/src/date-utils.scm +++ b/src/date-utils.scm @@ -35,10 +35,11 @@ (define %week-start-lookup-data (let* ((week-start-day 1) ; Monday + (start-year 2020) (years (iota (+ 2 (- (date-year (current-date)) - 2019)) - 2019)) + start-year)) + start-year)) (first-week-mondays-by-year (fold (lambda (year data) (let* ((fourth-of-january -- cgit v1.2.3