diff options
author | Albert Krewinkel <tarleb@moltkeplatz.de> | 2014-05-09 18:23:23 +0200 |
---|---|---|
committer | Albert Krewinkel <tarleb@moltkeplatz.de> | 2014-05-09 18:23:23 +0200 |
commit | 07694b30184bcf2ed0e2998016df394f47a1996f (patch) | |
tree | b24e06d60092d73e1ba45851e16c732d5b0c105d /tests/Tests | |
parent | 757c4f68f3f3cab99db9499936e3ae4775ebbddf (diff) | |
download | pandoc-07694b30184bcf2ed0e2998016df394f47a1996f.tar.gz |
Org reader: Fix parsing of blank lines within blocks
Blank lines were parsed as two newlines instead of just one.
Thanks to Xiao Hanyu (@xiaohanyu) for pointing this out.
Diffstat (limited to 'tests/Tests')
-rw-r--r-- | tests/Tests/Readers/Org.hs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Org.hs b/tests/Tests/Readers/Org.hs index a78e8861f..87b0d0c90 100644 --- a/tests/Tests/Readers/Org.hs +++ b/tests/Tests/Readers/Org.hs @@ -920,5 +920,14 @@ tests = (unlines [ "fmap id = id" , "fmap (p . q) = (fmap p) . (fmap q)" ]))) + + , "Convert blank lines in blocks to single newlines" =: + unlines [ "#+begin_html" + , "" + , "<span>boring</span>" + , "" + , "#+end_html" + ] =?> + rawBlock "html" "\n<span>boring</span>\n\n" ] ] |