diff options
author | Albert Krewinkel <tarleb@moltkeplatz.de> | 2014-04-19 15:05:03 +0200 |
---|---|---|
committer | Albert Krewinkel <tarleb@moltkeplatz.de> | 2014-04-19 15:13:16 +0200 |
commit | 8276449520ba85c78f0b4e919fbc9bcf893a74f0 (patch) | |
tree | 24dd281c8860af591641de75ed2b9921f21de27c /tests | |
parent | efebade38b3aef30b5fbf04e60f1fc2bd76e6c6c (diff) | |
download | pandoc-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')
-rw-r--r-- | tests/Tests/Readers/Org.hs | 12 |
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" , "" |