From 9d52ecdd422a6821c9f37f53e3d30d4be4e41e8f Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Sat, 16 Aug 2014 22:57:00 -0700 Subject: HTML reader: Parse appropriately styled span as SmallCaps. --- tests/html-reader.native | 1 + 1 file changed, 1 insertion(+) (limited to 'tests/html-reader.native') diff --git a/tests/html-reader.native b/tests/html-reader.native index c6ed36910..aef6e40fc 100644 --- a/tests/html-reader.native +++ b/tests/html-reader.native @@ -193,6 +193,7 @@ Pandoc (Meta {unMeta = fromList [("generator",MetaInlines [Str "pandoc"]),("titl ,Para [Strong [Emph [Str "This",Space,Str "is",Space,Str "strong",Space,Str "and",Space,Str "em."]]] ,Para [Str "So",Space,Str "is",Space,Strong [Emph [Str "this"]],Space,Str "word."] ,Para [Str "This",Space,Str "is",Space,Str "code:",Space,Code ("",[],[]) ">",Str ",",Space,Code ("",[],[]) "$",Str ",",Space,Code ("",[],[]) "\\",Str ",",Space,Code ("",[],[]) "\\$",Str ",",Space,Code ("",[],[]) "",Str "."] +,Para [Str "This",Space,Str "is",Space,SmallCaps [Str "small",Space,Str "caps"],Str "."] ,HorizontalRule ,Header 1 ("",[],[]) [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"] ,Para [Str "\"Hello,\"",Space,Str "said",Space,Str "the",Space,Str "spider.",Space,Str "\"'Shelob'",Space,Str "is",Space,Str "my",Space,Str "name.\""] -- cgit v1.2.3