From 1e202b3c554abe84cf0fc065342a114b2ce9a691 Mon Sep 17 00:00:00 2001
From: Jaidyn Ann <10477760+JadedCtrl@users.noreply.github.com>
Date: Tue, 6 Feb 2024 22:34:34 -0600
Subject: [PATCH] Fix truncating of last vcard-property

---
 vcarded.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/vcarded.scm b/vcarded.scm
index 1845e84..f277419 100644
--- 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.