Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Docx reader: test lists in table cells.

Browse source
This commit is contained in:
Jesse Rosenthal 2015-02-13 09:08:07 -05:00
parent 24fd0ad04d
commit 616e211f36
3 changed files with 15 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tests/Tests/Readers/Docx.hs
View file

@ -187,6 +187,10 @@ tests = [ testGroup "inlines"
"tables"
"docx/tables.docx"
"docx/tables.native"
, testCompare
"tables with lists in cells"
"docx/table_with_list_cell.docx"
"docx/table_with_list_cell.native"
, testCompare
"code block"
"docx/codeblock.docx"

BIN
tests/docx/table_with_list_cell.docx Normal file
View file

Binary file not shown.

11
tests/docx/table_with_list_cell.native Normal file
View file

@ -0,0 +1,11 @@
[Table [] [AlignDefault,AlignDefault] [0.0,0.0]
[[Plain [Str "Cell",Space,Str "with",Space,Str "text"]]
,[Plain [Str "Cell",Space,Str "with",Space,Str "text"]]]
[[[BulletList
[[Para [Str "Cell",Space,Str "with"]]
,[Para [Str "A"]]
,[Para [Str "Bullet",Space,Str "list"]]]]
,[OrderedList (1,Decimal,Period)
[[Para [Str "Cell",Space,Str "with"]]
,[Para [Str "A"]]
,[Para [Str "Numbered",Space,Str "list."]]]]]]]