From b1e28b8b122a46951ab8e17f010ab58fd06f9524 Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Sun, 28 Sep 2014 19:01:05 +0100
Subject: Fix parse failure with spaces preceding HTML

---
 src/microformats/parser.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/microformats/parser.clj b/src/microformats/parser.clj
index 9377d4a..32d0331 100644
--- a/src/microformats/parser.clj
+++ b/src/microformats/parser.clj
@@ -279,5 +279,5 @@
 (defn parse
   "Parse a HTML string with microformats"
   [html]
-  (let [document (html/html-snippet html)]
+  (let [document (html/html-snippet (str/trim html))]
     {:items (mapv parse-h (some->> document z/xml-zip select-h)) :rels (parse-rels document)}))
-- 
cgit 1.4.1