git.iko.soy/typeable/pandoc
on master help sign in
Docx reader: add tests for i18n headers.
c0ddcb3Jesse Rosenthal
tests/Tests/Readers/Docx.hs+4
compare with master
unifiedsplit
@@ -159,6 +159,10 @@ tests = [ testGroup "inlines"
159 "headers in other languages"
159 "headers in other languages"
160 "docx/danish_headers.docx"
160 "docx/danish_headers.docx"
161 "docx/danish_headers.native"
161 "docx/danish_headers.native"
162+ , testCompare
163+ "i18n blocks (headers and blockquotes)"
164+ "docx/i18n_blocks.docx"
165+ "docx/i18n_blocks.native"
162 , testCompare
166 , testCompare
163 "lists"
167 "lists"
164 "docx/lists.docx"
168 "docx/lists.docx"
tests/docx/i18n_blocks.docxnew file

Binary file not shown.

tests/docx/i18n_blocks.nativenew file+8
@@ -0,0 +1,8 @@
1+[Header 1 ("this-is-heading-1",[],[]) [Str "This",Space,Str "is",Space,Str "Heading",Space,Str "1"]
2+,Header 2 ("this-is-heading-2",[],[]) [Str "This",Space,Str "is",Space,Str "Heading",Space,Str "2"]
3+,BlockQuote
4+ [Para [Str "This",Space,Str "is",Space,Str "Quote"]
5+ ,Para [Str "This",Space,Str "is",Space,Str "Block",Space,Str "Text"]]
6+,BulletList
7+ [[Para [Str "This",Space,Str "is",Space,Str "list",Space,Str "item",Space,Str "1"]]
8+ ,[Para [Str "This",Space,Str "is",Space,Str "list",Space,Str "item",Space,Str "2"]]]]