aboutsummaryrefslogtreecommitdiff
path: root/tests/Tests
diff options
context:
space:
mode:
authorAlbert Krewinkel <tarleb@moltkeplatz.de>2014-04-19 15:05:03 +0200
committerAlbert Krewinkel <tarleb@moltkeplatz.de>2014-04-19 15:13:16 +0200
commit8276449520ba85c78f0b4e919fbc9bcf893a74f0 (patch)
tree24dd281c8860af591641de75ed2b9921f21de27c /tests/Tests
parentefebade38b3aef30b5fbf04e60f1fc2bd76e6c6c (diff)
downloadpandoc-8276449520ba85c78f0b4e919fbc9bcf893a74f0.tar.gz
Org reader: Allow for compact definition lists
Use `Text.Pandoc.Shared.compactify'DL` to allow for compact definition lists.
Diffstat (limited to 'tests/Tests')
-rw-r--r--tests/Tests/Readers/Org.hs12
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Org.hs b/tests/Tests/Readers/Org.hs
index 4cc405c0f..f62b73ce4 100644
--- a/tests/Tests/Readers/Org.hs
+++ b/tests/Tests/Readers/Org.hs
@@ -567,6 +567,18 @@ tests =
])
]
+ , "Compact definition list" =:
+ unlines [ "- ATP :: adenosine 5' triphosphate"
+ , "- DNA :: deoxyribonucleic acid"
+ , "- PCR :: polymerase chain reaction"
+ , ""
+ ] =?>
+ definitionList
+ [ ("ATP", [ plain $ spcSep [ "adenosine", "5'", "triphosphate" ] ])
+ , ("DNA", [ plain $ spcSep [ "deoxyribonucleic", "acid" ] ])
+ , ("PCR", [ plain $ spcSep [ "polymerase", "chain", "reaction" ] ])
+ ]
+
, "Loose bullet list" =:
unlines [ "- apple"
, ""