diff options
| author | Jesse Rosenthal <jrosenthal@jhu.edu> | 2014-06-22 01:58:41 -0400 |
|---|---|---|
| committer | Jesse Rosenthal <jrosenthal@jhu.edu> | 2014-06-22 01:58:41 -0400 |
| commit | ed43513087b514a5240fde04784dbf8709182513 (patch) | |
| tree | 8318fa059ee7adb1103d0de5792a116b30b23502 /tests | |
| parent | b3df3a38611fe4fd03fa2d4e38ba45ae7cf8fe08 (diff) | |
| download | pandoc-ed43513087b514a5240fde04784dbf8709182513.tar.gz | |
Docx reader tests: add tests for normalization deep in blocks.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/Tests/Readers/Docx.hs | 4 | ||||
| -rw-r--r-- | tests/docx.deep_normalize.docx | bin | 0 -> 29246 bytes | |||
| -rw-r--r-- | tests/docx.deep_normalize.native | 6 |
3 files changed, 10 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Docx.hs b/tests/Tests/Readers/Docx.hs index 74184efc6..ffb079eee 100644 --- a/tests/Tests/Readers/Docx.hs +++ b/tests/Tests/Readers/Docx.hs @@ -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 diff --git a/tests/docx.deep_normalize.docx b/tests/docx.deep_normalize.docx Binary files differnew file mode 100644 index 000000000..7626d59ce --- /dev/null +++ b/tests/docx.deep_normalize.docx diff --git a/tests/docx.deep_normalize.native b/tests/docx.deep_normalize.native new file mode 100644 index 000000000..9b2089ec8 --- /dev/null +++ b/tests/docx.deep_normalize.native @@ -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."]]]]]]]] |