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/fetch.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'module/fetch.scm')

diff --git a/module/fetch.scm b/module/fetch.scm
index b01329a8..4497fa98 100755
--- a/module/fetch.scm
+++ b/module/fetch.scm
@@ -25,7 +25,7 @@
 
 (filter-children!
  (lambda (ev) (and (eq? 'VEVENT (type ev))
-              (event-in? ev (date->time-utc (string->date "2019-04-03" "~Y-~m-~d")))))
+              (event-contains? ev (date->time-utc (string->date "2019-04-03" "~Y-~m-~d")))))
  cal)
 
 (serialize-vcomponent cal)
-- 
cgit v1.2.3