@@ -242,7 +242,7 @@ yamlMetaBlock = try $ do
242242 -- by including --- and ..., we allow yaml blocks with just comments:
243243 let rawYaml = unlines ("---" : (rawYamlLines ++ ["..."]))
244244 optional blanklines
245− case YAML.decodeStrict (UTF8.fromString rawYaml) of
245+ case YAML.decode (UTF8.fromStringLazy rawYaml) of
246246 Right (YAML.Mapping _ hashmap : _) -> do
247247 let alist = M.toList hashmap
248248 mapM_ (\(key, v) ->