aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@hornquist.se>2019-04-30 12:36:02 +0200
committerHugo Hörnquist <hugo@hornquist.se>2019-04-30 12:36:02 +0200
commit90b6d836f777665240a3f535890cd22f93c1aebf (patch)
tree69f162b490fa3d3e24b652a0485757ebaca030fc
parentAdd HTML sidebar, various formatting. (diff)
downloadcalp-90b6d836f777665240a3f535890cd22f93c1aebf.tar.gz
calp-90b6d836f777665240a3f535890cd22f93c1aebf.tar.xz
Fix horizontal stripes.
-rw-r--r--module/output/html.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/output/html.scm b/module/output/html.scm
index 6fb23a9c..841acd97 100644
--- a/module/output/html.scm
+++ b/module/output/html.scm
@@ -95,7 +95,7 @@
(span (@ (class "dayname")) ,(date->string date "~a")))
(div (@ (class "events"))
,@(map (lambda (time)
- `(div (@ (class "clock clock-" time)) ""))
+ `(div (@ (class "clock clock-" ,time)) ""))
(iota 12 0 2))
,@(stream->list (stream-map (lambda (e) (vevent->sxml date e)) events))))))