From 475eb600bb6f7ba0107c0e95a8aa1d483d14f6bb Mon Sep 17 00:00:00 2001
From: Steffen Jost <jost@tcs.ifi.lmu.de>
Date: Mon, 5 Sep 2022 14:29:04 +0200
Subject: [PATCH] Revert "test(pandoc): temporarily disable failing test for
 applyMetas -- to be reverted and properly fixed"

This reverts commit 3081e61e02d0ba9d359026ffbb25a5533b7aadaf.
---
 test/PandocSpec.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test/PandocSpec.hs b/test/PandocSpec.hs
index 14e55dcb0..135f702ea 100644
--- a/test/PandocSpec.hs
+++ b/test/PandocSpec.hs
@@ -44,7 +44,7 @@ instance Arbitrary ArbitraryMeta where
 spec :: Spec
 spec = do
   let mlist = Map.toAscList . unMeta
-  {- TODO
+
   describe "applyMetas" $ do
     it "should actually set values" $ do
       (ml, abMetaOriginal, blocks) <- generate arbitrary
@@ -65,7 +65,7 @@ spec = do
         oldm = [(k,t) | (k, t) <- mlist metaOriginal , Set.member k nullKeys]
         newm = [(k,t) | (k, t) <- mlist newMeta      , Set.member k nullKeys]
       oldm `shouldMatchList` newm
-  -}
+
   describe "addMeta" $ do
     it "should possibly overwrite existing settings" $ do
       (abMetaOverwrite, abMetaOriginal, blocks) <- generate arbitrary