aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Org/Meta.hs
diff options
context:
space:
mode:
authorAlbert Krewinkel <albert@zeitkraut.de>2020-11-22 12:50:08 +0100
committerAlbert Krewinkel <albert@zeitkraut.de>2020-11-22 12:53:05 +0100
commit5344dab8ebf29ff96dd9e0d1411e11b44e2ccccf (patch)
tree8af87d5bd62cd99cda9147bd58d4f0dab27607aa /src/Text/Pandoc/Readers/Org/Meta.hs
parentae52918faa36ad59deca3561acce79ad6d3ea0c2 (diff)
downloadpandoc-5344dab8ebf29ff96dd9e0d1411e11b44e2ccccf.tar.gz
Org reader: parse `#+LANGUAGE` into `lang` metadata field
Fixes: #6845
Diffstat (limited to 'src/Text/Pandoc/Readers/Org/Meta.hs')
-rw-r--r--src/Text/Pandoc/Readers/Org/Meta.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/Org/Meta.hs b/src/Text/Pandoc/Readers/Org/Meta.hs
index 43de04ffa..4864d9478 100644
--- a/src/Text/Pandoc/Readers/Org/Meta.hs
+++ b/src/Text/Pandoc/Readers/Org/Meta.hs
@@ -93,6 +93,8 @@ keywordHandlers = Map.fromList
, "institute" ~~> lineOfInlines `parseThen` collectLines "institute"
-- topic keywords
, "keywords" ~~> lineOfInlines `parseThen` collectLines "keywords"
+ -- document language
+ , "language" ~~> fmap pure anyLine `parseThen` B.setMeta "lang"
-- LaTeX-specific export settings
, "latex_class" ~~> fmap pure anyLine `parseThen` B.setMeta "documentclass"
, "latex_class_options" ~~>