diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-09-10 06:41:41 -0700 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2017-09-10 06:41:41 -0700 |
| commit | 41a16a1e9dbfd62d430fb7c5a75b8c3e207d383f (patch) | |
| tree | 79b2a7467b4648b2dfc64caa02d1c093290b12be /test/Tests | |
| parent | cbdeed9cfd027d2deede890a5a9177423178cea4 (diff) | |
| parent | afedb41b170cd9198ab589567f39e99717667a31 (diff) | |
| download | pandoc-41a16a1e9dbfd62d430fb7c5a75b8c3e207d383f.tar.gz | |
Merge pull request #3908 from labdsf/muse-reader-example
Muse reader: trim newlines from <example>s
Diffstat (limited to 'test/Tests')
| -rw-r--r-- | test/Tests/Readers/Muse.hs | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs index 6f602d7c3..43a1d0697 100644 --- a/test/Tests/Readers/Muse.hs +++ b/test/Tests/Readers/Muse.hs @@ -230,6 +230,31 @@ tests = lineBlock [ "Foo bar" ] <> lineBlock [ "Foo bar" ] <> lineBlock [ "\160\160\160Foo" ] + , testGroup "Example tag" + [ "Tags on separate lines" =: + T.unlines [ "<example>" + , "Example line" + , "</example>" + ] =?> + codeBlock "Example line" + , "One line" =: + "<example>Example line</example>" =?> + codeBlock "Example line" + , "One blank line in the beginning" =: + T.unlines [ "<example>" + , "" + , "Example line" + , "</example>" + ] =?> + codeBlock "\nExample line" + , "One blank line in the end" =: + T.unlines [ "<example>" + , "Example line" + , "" + , "</example>" + ] =?> + codeBlock "Example line\n" + ] , "Center" =: "<center>Hello, world</center>" =?> para (text "Hello, world") , "Right" =: "<right>Hello, world</right>" =?> para (text "Hello, world") , testGroup "Comments" |