diff options
author | John MacFarlane <jgm@berkeley.edu> | 2014-06-23 14:33:38 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2014-06-23 14:33:38 -0700 |
commit | ac6756009fe997ff6e2c00cd7c2e74ef1877a4ab (patch) | |
tree | 7e446d04e287f378d94665a16b9c52b19022b0ae /tests | |
parent | 87ab01637e1dc0f583277828bc458567a72e38ce (diff) | |
parent | 9b954fa855158d99b4ddba7c3ffe7f2fed7ce25f (diff) |
Merge pull request #1366 from jkr/reducible3
Docx rewrite and cleanup (in terms of Reducible typeclass)
Diffstat (limited to 'tests')
-rw-r--r-- | tests/Tests/Readers/Docx.hs | 4 | ||||
-rw-r--r-- | tests/docx.trailing_spaces_in_formatting.docx | bin | 0 -> 12916 bytes | |||
-rw-r--r-- | tests/docx.trailing_spaces_in_formatting.native | 1 |
3 files changed, 5 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Docx.hs b/tests/Tests/Readers/Docx.hs index ffb079eee..a42dc31e9 100644 --- a/tests/Tests/Readers/Docx.hs +++ b/tests/Tests/Readers/Docx.hs @@ -82,6 +82,10 @@ tests = [ testGroup "inlines" "normalizing inlines deep inside blocks" "docx.deep_normalize.docx" "docx.deep_normalize.native" + , testCompare + "move trailing spaces outside of formatting" + "docx.trailing_spaces_in_formatting.docx" + "docx.trailing_spaces_in_formatting.native" ] , testGroup "blocks" [ testCompare diff --git a/tests/docx.trailing_spaces_in_formatting.docx b/tests/docx.trailing_spaces_in_formatting.docx Binary files differnew file mode 100644 index 000000000..ebe7404a9 --- /dev/null +++ b/tests/docx.trailing_spaces_in_formatting.docx diff --git a/tests/docx.trailing_spaces_in_formatting.native b/tests/docx.trailing_spaces_in_formatting.native new file mode 100644 index 000000000..46ea9bca8 --- /dev/null +++ b/tests/docx.trailing_spaces_in_formatting.native @@ -0,0 +1 @@ +[Para [Str "Turn",Space,Str "my",Space,Emph [Str "formatting"],Space,Str "off",Space,Str "after",Space,Str "the",Space,Str "spaces."]] |