git.iko.soy/typeable/pandoc
on master help sign in
Docx reader: add tests for i18n headers.

This tests blockquotes and headers in Russian. Previous tests make sure that this doesn't produce a regression in en-us Header and Blockquotes.

commitc0ddcb359e549b8631ec22c4aa8d97f72298be87 authorJesse Rosenthal <jrosenthal@jhu.edu> dateSat 25 Oct 2014, 16:00 (12 years ago) parent96c4b9e
3 files changed+12
compare with master
unifiedsplit
tests/Tests/Readers/Docx.hs+4 tests/docx/i18n_blocks.docx tests/docx/i18n_blocks.native+8
tests/Tests/Readers/Docx.hs+4
@@ -159,6 +159,10 @@ tests = [ testGroup "inlines"
159159 "headers in other languages"
160160 "docx/danish_headers.docx"
161161 "docx/danish_headers.native"
162+ , testCompare
163+ "i18n blocks (headers and blockquotes)"
164+ "docx/i18n_blocks.docx"
165+ "docx/i18n_blocks.native"
162166 , testCompare
163167 "lists"
164168 "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"]]]]