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."]]]]]]]