summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2020-01-18 12:23:01 +0000
committerChristopher Baines <mail@cbaines.net>2020-01-18 12:23:01 +0000
commit39051694bd3b493182f2693e9a4cc9abea49f991 (patch)
treef8b0e90d3f5abba2694cdbdc2b334375b6bb4995
parenteedd35be26ffb9a4bd1381bd06426467393758f3 (diff)
downloadweekly-news-39051694bd3b493182f2693e9a4cc9abea49f991.tar
weekly-news-39051694bd3b493182f2693e9a4cc9abea49f991.tar.gz
Change the start year to 2020
-rw-r--r--src/date-utils.scm5
1 files 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