From 2f0529fdec94f999d903add6e364770e6ede4613 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@hornquist.se>
Date: Thu, 25 Apr 2019 19:04:04 +0200
Subject: Rename event-in? => event-contains?.

---
 module/vcomponent/datetime.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'module/vcomponent/datetime.scm')

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)))
-- 
cgit v1.2.3