aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2020-04-29 00:44:21 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2020-04-29 00:44:21 +0200
commitabd4551f34fc29d8d6a6fab5ea57558f14ae3cf4 (patch)
tree10a219bf8fd555625ef8e0bdc42fa1d373e87355
parentRemove dead code from style.css. (diff)
downloadcalp-abd4551f34fc29d8d6a6fab5ea57558f14ae3cf4.tar.gz
calp-abd4551f34fc29d8d6a6fab5ea57558f14ae3cf4.tar.xz
Add TODO to HTML.
-rw-r--r--module/output/html.scm1
1 files changed, 1 insertions, 0 deletions
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
))))