diff options
author | John MacFarlane <jgm@berkeley.edu> | 2014-10-18 13:19:26 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2014-10-18 13:19:26 -0700 |
commit | a1b5997af499252cde722a6250657f21e960a50a (patch) | |
tree | 1ebef0c76404c9e3ee7660f409f43c77fa19a04d /tests | |
parent | 8b60d430f2095c42daf26f2921359d5c49f0757d (diff) | |
parent | e3c36ed6ce5f9ea3e06c491d5a1ac892bfcd6089 (diff) | |
download | pandoc-a1b5997af499252cde722a6250657f21e960a50a.tar.gz |
Merge pull request #1702 from tarleb/org-comment-trees
Org reader: Drop COMMENT document trees
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 92ec8155b..b37825ad5 100644 --- a/tests/Tests/Readers/Org.hs +++ b/tests/Tests/Readers/Org.hs @@ -450,6 +450,18 @@ tests = , header 2 ("walk" <> space <> "dog") ] + , "Comment Trees" =: + unlines [ "* COMMENT A comment tree" + , " Not much going on here" + , "** This will be dropped" + , "* Comment tree above" + ] =?> + header 1 "Comment tree above" + + , "Nothing but a COMMENT header" =: + "* COMMENT Test" =?> + (mempty::Blocks) + , "Paragraph starting with an asterisk" =: "*five" =?> para "*five" |