From e2571e582fe302337924ecc6aea27505b94b982a Mon Sep 17 00:00:00 2001 From: Alan Pearce Date: Sun, 28 Sep 2014 20:23:56 +0100 Subject: Fix error parsing dt value from unexpected element --- src/microformats/parser.clj | 3 ++- test/microformats/parser_expectations.clj | 3 +++ 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/src/microformats/parser.clj b/src/microformats/parser.clj index 27c1388..8d5bb10 100644 --- a/src/microformats/parser.clj +++ b/src/microformats/parser.clj @@ -135,7 +135,8 @@ :del (-> el :attrs :datetime) :abbr (-> el :attrs :title) :data (-> el :attrs :value) - :input (-> el :attrs :value)) + :input (-> el :attrs :value) + nil) (node-to-text (:content el)) ""))) diff --git a/test/microformats/parser_expectations.clj b/test/microformats/parser_expectations.clj index 12234aa..b22e3a9 100644 --- a/test/microformats/parser_expectations.clj +++ b/test/microformats/parser_expectations.clj @@ -130,6 +130,9 @@ (expect {:start '("2012-08-05T14:50")} (parse-dt (snippet ""))) +(expect {:start '("2012-08-05T14:50")} + (parse-dt (snippet "2012-08-05T14:50"))) + (expect {:content '({:html "Here is a load of embedded markup" :value "Here is a load of embedded markup"})} (parse-e (snippet "
Here is a load of embedded markup
"))) -- cgit 1.4.1