From 616e211f366a5252a105f2ef6e5c7c824874ca8b Mon Sep 17 00:00:00 2001 From: Jesse Rosenthal Date: Fri, 13 Feb 2015 09:08:07 -0500 Subject: Docx reader: test lists in table cells. --- tests/Tests/Readers/Docx.hs | 4 ++++ tests/docx/table_with_list_cell.docx | Bin 0 -> 32615 bytes tests/docx/table_with_list_cell.native | 11 +++++++++++ 3 files changed, 15 insertions(+) create mode 100644 tests/docx/table_with_list_cell.docx create mode 100644 tests/docx/table_with_list_cell.native diff --git a/tests/Tests/Readers/Docx.hs b/tests/Tests/Readers/Docx.hs index 73bfcd046..d7278b7c2 100644 --- a/tests/Tests/Readers/Docx.hs +++ b/tests/Tests/Readers/Docx.hs @@ -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" diff --git a/tests/docx/table_with_list_cell.docx b/tests/docx/table_with_list_cell.docx new file mode 100644 index 000000000..1db065770 Binary files /dev/null and b/tests/docx/table_with_list_cell.docx differ diff --git a/tests/docx/table_with_list_cell.native b/tests/docx/table_with_list_cell.native new file mode 100644 index 000000000..81bb15a1e --- /dev/null +++ b/tests/docx/table_with_list_cell.native @@ -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."]]]]]]] -- cgit v1.2.3