git.iko.soy/typeable/pandoc
on master help sign in
Docx reader tests: add tests for normalization deep in blocks.
ed43513Jesse Rosenthal
tests/Tests/Readers/Docx.hs+4
compare with master
unifiedsplit
@@ -78,6 +78,10 @@ tests = [ testGroup "inlines"
78 "normalizing inlines"
78 "normalizing inlines"
79 "docx.normalize.docx"
79 "docx.normalize.docx"
80 "docx.normalize.native"
80 "docx.normalize.native"
81+ , testCompare
82+ "normalizing inlines deep inside blocks"
83+ "docx.deep_normalize.docx"
84+ "docx.deep_normalize.native"
81 ]
85 ]
82 , testGroup "blocks"
86 , testGroup "blocks"
83 [ testCompare
87 [ testCompare
tests/docx.deep_normalize.docxnew file

Binary file not shown.

tests/docx.deep_normalize.nativenew file+6
@@ -0,0 +1,6 @@
1+[OrderedList (1,Decimal,OneParen)
2+ [[Para [Str "This",Space,Str "is",Space,Str "at",Space,Str "the",Space,Str "first",Space,Str "level"]
3+ ,OrderedList (1,LowerAlpha,DefaultDelim)
4+ [[Para [Str "This",Space,Str "is",Space,Str "at",Space,Str "the",Space,Str "second",Space,Str "level"]
5+ ,OrderedList (1,LowerRoman,DefaultDelim)
6+ [[Para [Str "This",Space,Str "is",Space,Emph [Str "at",Space,Strong [Str "the",Space,Str "third",Space,Str "level"],Str ",",Space,Str "and",Space,Str "I",Space,Str "want",Space,Str "to"],Space,Str "test",Space,Str "normalization",Space,Str "here."]]]]]]]]