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.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/module/vcomponent/datetime.scm b/module/vcomponent/datetime.scm
index e427b088..4e3cfbe6 100644
--- a/module/vcomponent/datetime.scm
+++ b/module/vcomponent/datetime.scm
@@ -7,7 +7,7 @@
#:export (parse-datetime
event-overlaps?
overlapping?
- event-in?
+ event-contains?
ev-time<?)
)
@@ -33,7 +33,7 @@ Event must have the DTSTART and DTEND attribute set."
(attr event-b 'DTSTART)
(attr event-b 'DTEND)))
-(define (event-in? ev time)
+(define (event-contains? ev time)
"Does event overlap the date that contains time."
(let* ((date (time-utc->date time))
(start (date->time-utc (drop-time date)))