git.iko.soy/typeable/pandoc
on master help sign in
Docx reader: add failing tests for inline code and code blocks.
21295c5Jesse Rosenthal
tests/Tests/Readers/Docx.hs+9
compare with master
unifiedsplit
@@ -86,6 +86,10 @@ tests = [ testGroup "inlines"
86 "move trailing spaces outside of formatting"
86 "move trailing spaces outside of formatting"
87 "docx.trailing_spaces_in_formatting.docx"
87 "docx.trailing_spaces_in_formatting.docx"
88 "docx.trailing_spaces_in_formatting.native"
88 "docx.trailing_spaces_in_formatting.native"
89+ , testCompare
90+ "inline code (with VerbatimChar style)"
91+ "docx.inline_code.docx"
92+ "docx.inline_code.native"
89 ]
93 ]
90 , testGroup "blocks"
94 , testGroup "blocks"
91 [ testCompare
95 [ testCompare
@@ -108,6 +112,11 @@ tests = [ testGroup "inlines"
108 "tables"
112 "tables"
109 "docx.tables.docx"
113 "docx.tables.docx"
110 "docx.tables.native"
114 "docx.tables.native"
115+ , testCompare
116+ "code block"
117+ "docx.codeblock.docx"
118+ "docx.codeblock.native"
119+
111 ]
120 ]
112 ]
121 ]
113
122
tests/docx.codeblock.docxnew file

Binary file not shown.

tests/docx.codeblock.nativenew file+3
@@ -0,0 +1,3 @@
1+[Para [Str "This",Space,Str "is",Space,Str "some",Space,Str "code:"]
2+,CodeBlock ("",[],[]) "readDocx :: ReaderOptions\n -> B.ByteString\n -> Pandoc"
3+,Para [Str "from",Space,Str "the",Space,Str "beginning",Space,Str "of",Space,Str "the",Space,Str "docx",Space,Str "reader."]]
tests/docx.inline_code.docxnew file

Binary file not shown.

tests/docx.inline_code.nativenew file+1
@@ -0,0 +1 @@
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."]]