From 2beb34d0d9481faa111567b6faf019c0c179c591 Mon Sep 17 00:00:00 2001 From: Alan Pearce Date: Sun, 28 Sep 2014 19:21:55 +0100 Subject: Parse properties for child microformats --- test/microformats/parser_expectations.clj | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'test') diff --git a/test/microformats/parser_expectations.clj b/test/microformats/parser_expectations.clj index 1cbeedd..12234aa 100644 --- a/test/microformats/parser_expectations.clj +++ b/test/microformats/parser_expectations.clj @@ -244,3 +244,14 @@ :properties {:name '("Example")}}] :rels {}} (parse "

Example

")) + +(expect {:items [{:type ["h-card"] + :properties {:name '("John Doe") + :org '({:value "Example" + :type ["h-card" "h-org"] + :properties {:name ("Example")}})}}] + :rels {}} + (parse "
+John Doe +Example +
")) -- cgit 1.4.1