From 344a39d93c1b41a778480d2a6608d8f7720a46c3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@hornquist.se>
Date: Fri, 27 Dec 2019 17:08:15 +0100
Subject: HTML Fix whole day events missing from sidebar.

---
 module/output/html.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'module')

diff --git a/module/output/html.scm b/module/output/html.scm
index f0c021c3..0f6fbbd0 100644
--- a/module/output/html.scm
+++ b/module/output/html.scm
@@ -158,9 +158,10 @@
                              (stream-filter
                               (lambda (ev)
                                 ;; If start was an earlier day
-                                ;; This removes all descriptions from events for previous days,
+                                ;; This removes all descriptions from
+                                ;; events for previous days,
                                 ;; solving duplicates.
-                                (time<? (date->time-utc date)
+                                (time<=? (date->time-utc date)
                                         (attr ev 'DTSTART)))
                               events))))))
 
-- 
cgit v1.2.3