From 28d17ea70fee316576cf28525e9b5ad15c62cf9d Mon Sep 17 00:00:00 2001
From: Albert Krewinkel <albert@zeitkraut.de>
Date: Mon, 29 Aug 2016 14:10:57 +0200
Subject: 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.
---
 src/Text/Pandoc/Readers/Org/Meta.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/Text/Pandoc')

diff --git a/src/Text/Pandoc/Readers/Org/Meta.hs b/src/Text/Pandoc/Readers/Org/Meta.hs
index ea3ec51c3..51fd2c9d8 100644
--- a/src/Text/Pandoc/Readers/Org/Meta.hs
+++ b/src/Text/Pandoc/Readers/Org/Meta.hs
@@ -82,6 +82,8 @@ metaValue key =
     -- pandoc does not.
     "latex_class_options" -> ("classoption",) <$>
                              metaModifiedString (filter (`notElem` "[]"))
+    "html_head"       -> (inclKey,) <$>
+                         accumulatingList inclKey (metaExportSnippet "html")
     _                 -> (key,) <$> metaString
 
 metaInlines :: OrgParser (F MetaValue)
-- 
cgit v1.2.3