diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2016-05-31 11:16:08 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2016-05-31 11:16:08 -0700 |
| commit | 669ecbd4abc0061d83537511ebeae10713a50047 (patch) | |
| tree | c375f1f58f21d29d6f153043d32dab36a925f477 /tests | |
| parent | 561afac0bc004e324358782c30a18eae0cd3cc4c (diff) | |
| parent | c17c62a2c74bbb6e36e12feea5aa6ba8679a023a (diff) | |
| download | pandoc-669ecbd4abc0061d83537511ebeae10713a50047.tar.gz | |
Merge pull request #2954 from tarleb/org-export-blocks
Org export blocks
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/Tests/Readers/Org.hs | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/tests/Tests/Readers/Org.hs b/tests/Tests/Readers/Org.hs index 780053059..345ed462a 100644 --- a/tests/Tests/Readers/Org.hs +++ b/tests/Tests/Readers/Org.hs @@ -1293,7 +1293,7 @@ tests = ] ] - , "Verse block with newlines" =: + , "Verse block with blank lines" =: unlines [ "#+BEGIN_VERSE" , "foo" , "" @@ -1302,6 +1302,20 @@ tests = ] =?> para ("foo" <> linebreak <> linebreak <> "bar") + , "Raw block LaTeX" =: + unlines [ "#+BEGIN_LaTeX" + , "The category $\\cat{Set}$ is adhesive." + , "#+END_LaTeX" + ] =?> + rawBlock "latex" "The category $\\cat{Set}$ is adhesive.\n" + + , "Export block HTML" =: + unlines [ "#+BEGIN_export html" + , "<samp>Hello, World!</samp>" + , "#+END_export" + ] =?> + rawBlock "html" "<samp>Hello, World!</samp>\n" + , "LaTeX fragment" =: unlines [ "\\begin{equation}" , "X_i = \\begin{cases}" |