diff options
author | Christopher Baines <mail@cbaines.net> | 2020-01-18 12:23:01 +0000 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2020-01-18 12:23:01 +0000 |
commit | 39051694bd3b493182f2693e9a4cc9abea49f991 (patch) | |
tree | f8b0e90d3f5abba2694cdbdc2b334375b6bb4995 /src | |
parent | eedd35be26ffb9a4bd1381bd06426467393758f3 (diff) | |
download | weekly-news-39051694bd3b493182f2693e9a4cc9abea49f991.tar weekly-news-39051694bd3b493182f2693e9a4cc9abea49f991.tar.gz |
Change the start year to 2020
Diffstat (limited to 'src')
-rw-r--r-- | src/date-utils.scm | 5 |
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 |