aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Writers
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-11-14 14:35:58 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-11-14 15:10:38 +0300
commit195b3af8b63bed91d565d8745e75f07509bb595d (patch)
tree648f39273ef0ea7876554050b56ec770b9e407fe /test/Tests/Writers
parentd27384c10962c30c2a9d5cf7bd93fb7e48ff57a4 (diff)
downloadpandoc-195b3af8b63bed91d565d8745e75f07509bb595d.tar.gz
Muse writer: indent simple tables only on the top level
Diffstat (limited to 'test/Tests/Writers')
-rw-r--r--test/Tests/Writers/Muse.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs
index 6cf718c0b..c2439b1a2 100644
--- a/test/Tests/Writers/Muse.hs
+++ b/test/Tests/Writers/Muse.hs
@@ -400,6 +400,12 @@ tests = [ testGroup "block elements"
, " Para 2.1 | Para 2.2"
, " |+ Table 1 +|"
]
+ , "table inside bullet list" =:
+ bulletList [simpleTable [] [[para "foo", para "bar"]
+ ,[para "bat", para "baz"]]]
+ =?> unlines [ " - foo | bar"
+ , " bat | baz"
+ ]
, "table with one column" =:
let headers = []
rows = [[para "Para 1"]