From f852c30bcef530d18a474ab6ab8350a3ef93d563 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@hornquist.se>
Date: Thu, 30 Jan 2020 22:51:45 +0100
Subject: Once again compiles.

---
 tests/vcomponent.scm | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 tests/vcomponent.scm

(limited to 'tests/vcomponent.scm')

diff --git a/tests/vcomponent.scm b/tests/vcomponent.scm
new file mode 100644
index 00000000..c64f1a9b
--- /dev/null
+++ b/tests/vcomponent.scm
@@ -0,0 +1,12 @@
+(((vcomponent base) attr)
+ ((vcomponent) parse-calendar))
+
+(define ev (call-with-input-string
+               "BEGIN:VEVENT
+KEY:value
+END:VEVENT"
+             parse-calendar))
+
+(test-assert (eq? #f (attr ev 'MISSING)) )
+(test-assert (attr ev 'KEY))
+(test-equal "value" (attr ev 'KEY))
-- 
cgit v1.2.3