diff --git a/test/PandocSpec.hs b/test/PandocSpec.hs
index 354071840..23e1eb251 100644
--- a/test/PandocSpec.hs
+++ b/test/PandocSpec.hs
@@ -43,8 +43,8 @@ instance Arbitrary ArbitraryMeta where
 
 spec :: Spec
 spec = do
-  let mlist = Map.toAscList . unMeta
   {- TODO
+  let mlist = Map.toAscList . unMeta  
   describe "applyMetas" $ do
     it "should actually set values" $ do
       (ml, abMetaOriginal, blocks) <- generate arbitrary