Fix truncating of last vcard-property

2024-02-06 22:34:34 -06:00 · 2024-02-06 22:34:34 -06:00 · 1e202b3c55
parent aaa6d5b292
commit 1e202b3c55
1 changed files with 1 additions and 1 deletions
--- a/vcarded.scm
+++ b/vcarded.scm
@ -154,7 +154,7 @@
  (let [(element (read-vcard-element))]
    (if (not (eof-object? (peek-char)))
        (append (list element) (read-vcard))
-        element)))
+        (list element))))


 ;; Read a single unfolded line into a vcard “element” list.