diff options
| author | Jesse Rosenthal <jrosenthal@jhu.edu> | 2019-02-06 21:11:51 -0500 |
|---|---|---|
| committer | Jesse Rosenthal <jrosenthal@jhu.edu> | 2019-02-06 21:14:46 -0500 |
| commit | 1847bdbb833cfdd7abb34e7f906ab9a1f74dfa17 (patch) | |
| tree | 567e8dbc30cfac51132fdb7eee17acc3aee5964b /test/Tests | |
| parent | 4cce0efa4824b4081a2d971c488c5026c314bbb5 (diff) | |
| download | pandoc-1847bdbb833cfdd7abb34e7f906ab9a1f74dfa17.tar.gz | |
Docx reader: Tests for alternate document.xml
Diffstat (limited to 'test/Tests')
| -rw-r--r-- | test/Tests/Readers/Docx.hs | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/test/Tests/Readers/Docx.hs b/test/Tests/Readers/Docx.hs index 34cc4bb53..48b9a27d0 100644 --- a/test/Tests/Readers/Docx.hs +++ b/test/Tests/Readers/Docx.hs @@ -126,7 +126,13 @@ testMediaBag :: String -> FilePath -> TestTree testMediaBag name docxFile = unsafePerformIO $ testMediaBagIO name docxFile tests :: [TestTree] -tests = [ testGroup "inlines" +tests = [ testGroup "document" + [ testCompare + "allow different document.xml file as defined in _rels/.rels" + "docx/alternate_document_path.docx" + "docx/alternate_document_path.native" + ] + , testGroup "inlines" [ testCompare "font formatting" "docx/inline_formatting.docx" @@ -422,5 +428,4 @@ tests = [ testGroup "inlines" "docx/metadata_after_normal.docx" "docx/metadata_after_normal.native" ] - ] |