From abd4551f34fc29d8d6a6fab5ea57558f14ae3cf4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Wed, 29 Apr 2020 00:44:21 +0200
Subject: Add TODO to HTML.

---
 module/output/html.scm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'module/output')

diff --git a/module/output/html.scm b/module/output/html.scm
index 768b948c..8a932fd0 100644
--- a/module/output/html.scm
+++ b/module/output/html.scm
@@ -560,6 +560,7 @@
           ,@(let ((first (week-number (car events) week-start))
                   (last (week-number (last events) week-start)))
               (map (lambda (v) `(div (@ (class "row-head")) ,v))
+                   ;; TODO this fails around new-year
                    (iota (1+ (- last first)) first)))
           ,@(map td events
                  ))))
-- 
cgit v1.2.3