aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/datetime.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/vcomponent/datetime.scm')
-rw-r--r--module/vcomponent/datetime.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/module/vcomponent/datetime.scm b/module/vcomponent/datetime.scm
index 44776516..7fc22066 100644
--- a/module/vcomponent/datetime.scm
+++ b/module/vcomponent/datetime.scm
@@ -107,6 +107,7 @@ Event must have the DTSTART and DTEND attribute set."
(define-public (long-event? ev)
(or (date? (attr ev 'DTSTART))
(datetime<= (datetime date: (date day: 1))
+ ;; TODO DTEND optional
(datetime-difference (attr ev 'DTEND)
(attr ev 'DTSTART)))))