diff options
| author | Hugo Hörnquist <hugo@hornquist.se> | 2020-01-30 22:51:45 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@hornquist.se> | 2020-01-30 22:51:45 +0100 |
| commit | f852c30bcef530d18a474ab6ab8350a3ef93d563 (patch) | |
| tree | 00fc29a6ff1a8c842d0a526f04d4124977dd6e46 /tests/vcomponent.scm | |
| parent | Update recurrence generate to new date obj. (diff) | |
| download | calp-f852c30bcef530d18a474ab6ab8350a3ef93d563.tar.gz calp-f852c30bcef530d18a474ab6ab8350a3ef93d563.tar.xz | |
Once again compiles.
Diffstat (limited to 'tests/vcomponent.scm')
| -rw-r--r-- | tests/vcomponent.scm | 12 |
1 files changed, 12 insertions, 0 deletions
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)) |