summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorAlbert Krewinkel <albert@zeitkraut.de>2016-08-29 14:10:57 +0200
committerAlbert Krewinkel <albert@zeitkraut.de>2016-08-29 14:10:57 +0200
commit28d17ea70fee316576cf28525e9b5ad15c62cf9d (patch)
tree3b2d80bef4da537142a0d04bcdffab16d1ad06f0 /tests
parentd164ead37900a186acad44bb244f9268d3e3e91d (diff)
Org reader: read HTML_head as header-includes
HTML-specific head content can be defined in `#+HTML_head` lines. They are parsed as format-specific inlines to ensure that they will only show up in HTML output.
Diffstat (limited to 'tests')
-rw-r--r--tests/Tests/Readers/Org.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Org.hs b/tests/Tests/Readers/Org.hs
index 534990876..524bed109 100644
--- a/tests/Tests/Readers/Org.hs
+++ b/tests/Tests/Readers/Org.hs
@@ -513,6 +513,13 @@ tests =
let meta = setMeta "classoption" (MetaString "a4paper") nullMeta
in Pandoc meta mempty
+ , "LaTeX_class_options is translated to classoption" =:
+ "#+html_head: <meta/>" =?>
+ let html = rawInline "html" "<meta/>"
+ inclList = MetaList [MetaInlines (toList html)]
+ meta = setMeta "header-includes" inclList nullMeta
+ in Pandoc meta mempty
+
, "later meta definitions take precedence" =:
unlines [ "#+AUTHOR: this will not be used"
, "#+author: Max"