From 2afd9819bf69e2ee34ab4fa34ee2ea9388659e4b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Sat, 23 May 2020 22:00:42 +0200
Subject: Remove (vcomponent util).

---
 module/vcomponent/util.scm | 11 -----------
 1 file changed, 11 deletions(-)
 delete mode 100644 module/vcomponent/util.scm

diff --git a/module/vcomponent/util.scm b/module/vcomponent/util.scm
deleted file mode 100644
index 81330c17..00000000
--- a/module/vcomponent/util.scm
+++ /dev/null
@@ -1,11 +0,0 @@
-(define-module (vcomponent util)
-  #:use-module (vcomponent util)
-  #:export (search))
-
-(define-public (search cal term)
-  (cdr (let ((events (filter (lambda (ev) (eq? 'VEVENT (type ev)))
-                             (children cal))))
-         (find (lambda (ev) (string-contains-ci (car ev) term))
-               (map cons (map (extract "SUMMARY")
-                              events)
-                    events)))))
-- 
cgit v1.2.3