aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/group.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/vcomponent/group.scm')
-rw-r--r--module/vcomponent/group.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/module/vcomponent/group.scm b/module/vcomponent/group.scm
index 1309ae6d..cf0fbe82 100644
--- a/module/vcomponent/group.scm
+++ b/module/vcomponent/group.scm
@@ -8,6 +8,7 @@
#:export (group-stream get-groups-between))
;; TODO templetize this
+;; TODO this seems to behave weird if the first day of the week is empty (0 events).
(define-stream (group-stream in-stream)
(define (ein? day) (lambda (e) (event-contains? e day)))