aboutsummaryrefslogtreecommitdiff
path: root/tests/Tests/Readers
diff options
context:
space:
mode:
authorTimothy Humphries <tim@utf8.me>2014-10-17 20:06:25 -0400
committerTimothy Humphries <tim@utf8.me>2014-10-17 20:06:25 -0400
commitf1f56e85334fd29b4ed670d0b280e85f68e21bf2 (patch)
treef07f8b4f200331afdca883b00b2995336dabbd64 /tests/Tests/Readers
parent4f4b0f031d17927b6787c9deee736cf0892cab70 (diff)
downloadpandoc-f1f56e85334fd29b4ed670d0b280e85f68e21bf2.tar.gz
Fix indent issue for definition lists
Tidy up fix for #1650, #1698 as per comments in #1680. Fix same issue for definition lists with the same method.
Diffstat (limited to 'tests/Tests/Readers')
-rw-r--r--tests/Tests/Readers/Org.hs10
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Org.hs b/tests/Tests/Readers/Org.hs
index f27388e46..978bf87b4 100644
--- a/tests/Tests/Readers/Org.hs
+++ b/tests/Tests/Readers/Org.hs
@@ -744,6 +744,16 @@ tests =
, ("PCR", [ plain $ spcSep [ "polymerase", "chain", "reaction" ] ])
]
+ , "Definition List With Trailing Header" =:
+ "- definition :: list\n\
+ \- cool :: defs\n\
+ \* header" =?>
+ mconcat [ definitionList [ ("definition", [plain "list"])
+ , ("cool", [plain "defs"])
+ ]
+ , header 1 "header"
+ ]
+
, "Loose bullet list" =:
unlines [ "- apple"
, ""