From d2d5eb8a993553eb5d1b9b9ca7863638864dde7e Mon Sep 17 00:00:00 2001
From: Albert Krewinkel <albert@zeitkraut.de>
Date: Sun, 28 Jun 2020 18:23:25 +0200
Subject: Org reader: read `#+INSTITUTE` values as text with markup

The value is stored in the `institute` metadata field and used in the
default beamer presentation template.
---
 test/Tests/Readers/Org/Meta.hs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'test')

diff --git a/test/Tests/Readers/Org/Meta.hs b/test/Tests/Readers/Org/Meta.hs
index 3852e676d..c811f2363 100644
--- a/test/Tests/Readers/Org/Meta.hs
+++ b/test/Tests/Readers/Org/Meta.hs
@@ -133,6 +133,10 @@ tests =
           inclList = MetaList [MetaInlines (toList html)]
           meta = setMeta "header-includes" inclList nullMeta
       in Pandoc meta mempty
+
+    , "Institute" =:
+      "#+INSTITUTE: ACME Inc." =?>
+      Pandoc (setMeta "institute" ("ACME Inc." :: Inlines) nullMeta) mempty
     ]
 
   , "Properties drawer" =:
-- 
cgit v1.2.3