Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Docx reader tests: add tests for normalization deep in blocks.

Browse source
This commit is contained in:
Jesse Rosenthal 2014-06-22 01:58:41 -04:00
parent b3df3a3861
commit ed43513087
3 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tests/Tests/Readers/Docx.hs
View file

@ -78,6 +78,10 @@ tests = [ testGroup "inlines"
"normalizing inlines"
"docx.normalize.docx"
"docx.normalize.native"
, testCompare
"normalizing inlines deep inside blocks"
"docx.deep_normalize.docx"
"docx.deep_normalize.native"
]
, testGroup "blocks"
[ testCompare

BIN
tests/docx.deep_normalize.docx Normal file
View file

Binary file not shown.

6
tests/docx.deep_normalize.native Normal file
View file

@ -0,0 +1,6 @@
[OrderedList (1,Decimal,OneParen)
[[Para [Str "This",Space,Str "is",Space,Str "at",Space,Str "the",Space,Str "first",Space,Str "level"]
,OrderedList (1,LowerAlpha,DefaultDelim)
[[Para [Str "This",Space,Str "is",Space,Str "at",Space,Str "the",Space,Str "second",Space,Str "level"]
,OrderedList (1,LowerRoman,DefaultDelim)
[[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."]]]]]]]]