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

---
 test/microformats/parser_expectations.clj | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'test')

diff --git a/test/microformats/parser_expectations.clj b/test/microformats/parser_expectations.clj
index 5f8eeef..1cbeedd 100644
--- a/test/microformats/parser_expectations.clj
+++ b/test/microformats/parser_expectations.clj
@@ -149,6 +149,9 @@
 (expect {:items [{:properties {:name '("Example User")} :type ["h-card"]}] :rels {}}
         (parse "<div class=\"h-card\"><p class=\"p-name\">  Example User  </p></div>"))
 
+(expect {:items [{:properties {:name '("Example User")} :type ["h-card"]}] :rels {}}
+        (parse "  <div class=\"h-card\"><p class=\"p-name\">Example User</p></div>"))
+
 (expect {:items [{:properties {:name '("Example User") :url '("http://example.com")}
                   :type ["h-card"]}] :rels {}}
         (parse "<div class=\"h-card\"><a class=\"p-name u-url\" href=\"http://example.com\">Example User</></div>"))
-- 
cgit 1.4.1