diff options
| author | Jesse Rosenthal <jrosenthal@jhu.edu> | 2014-06-24 10:33:49 -0400 |
|---|---|---|
| committer | Jesse Rosenthal <jrosenthal@jhu.edu> | 2014-06-24 10:33:49 -0400 |
| commit | 21295c5ab5567126c3112b9417f68c76b4f6debf (patch) | |
| tree | b045b47ab9a41a4b9f250b7850e49c266c81c4e8 | |
| parent | fc4e6b313554812ac88c935756b65cb864d20c20 (diff) | |
| download | pandoc-21295c5ab5567126c3112b9417f68c76b4f6debf.tar.gz | |
Docx reader: add failing tests for inline code and code blocks.
| -rw-r--r-- | tests/Tests/Readers/Docx.hs | 9 | ||||
| -rw-r--r-- | tests/docx.codeblock.docx | bin | 0 -> 8465 bytes | |||
| -rw-r--r-- | tests/docx.codeblock.native | 3 | ||||
| -rw-r--r-- | tests/docx.inline_code.docx | bin | 0 -> 8379 bytes | |||
| -rw-r--r-- | tests/docx.inline_code.native | 1 |
5 files changed, 13 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Docx.hs b/tests/Tests/Readers/Docx.hs index a42dc31e9..c49bee14e 100644 --- a/tests/Tests/Readers/Docx.hs +++ b/tests/Tests/Readers/Docx.hs @@ -86,6 +86,10 @@ tests = [ testGroup "inlines" "move trailing spaces outside of formatting" "docx.trailing_spaces_in_formatting.docx" "docx.trailing_spaces_in_formatting.native" + , testCompare + "inline code (with VerbatimChar style)" + "docx.inline_code.docx" + "docx.inline_code.native" ] , testGroup "blocks" [ testCompare @@ -108,6 +112,11 @@ tests = [ testGroup "inlines" "tables" "docx.tables.docx" "docx.tables.native" + , testCompare + "code block" + "docx.codeblock.docx" + "docx.codeblock.native" + ] ] diff --git a/tests/docx.codeblock.docx b/tests/docx.codeblock.docx Binary files differnew file mode 100644 index 000000000..8ec00953c --- /dev/null +++ b/tests/docx.codeblock.docx diff --git a/tests/docx.codeblock.native b/tests/docx.codeblock.native new file mode 100644 index 000000000..441e33511 --- /dev/null +++ b/tests/docx.codeblock.native @@ -0,0 +1,3 @@ +[Para [Str "This",Space,Str "is",Space,Str "some",Space,Str "code:"] +,CodeBlock ("",[],[]) "readDocx :: ReaderOptions\n -> B.ByteString\n -> Pandoc" +,Para [Str "from",Space,Str "the",Space,Str "beginning",Space,Str "of",Space,Str "the",Space,Str "docx",Space,Str "reader."]] diff --git a/tests/docx.inline_code.docx b/tests/docx.inline_code.docx Binary files differnew file mode 100644 index 000000000..75c5ea3cb --- /dev/null +++ b/tests/docx.inline_code.docx diff --git a/tests/docx.inline_code.native b/tests/docx.inline_code.native new file mode 100644 index 000000000..11cf2777c --- /dev/null +++ b/tests/docx.inline_code.native @@ -0,0 +1 @@ +[Para [Str "This",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "of",Space,Code ("",[],[]) "inline code",Space,Str "with",Space,Str "three",Space,Str "spaces."]] |