CslJson writer: fix compiler warning
commit9c8ff53b54836cbe7fa9417784f3204cd041f3ac
authorAlbert Krewinkel <albert@zeitkraut.de>
dateSun 31 Jan 2021, 14:37 (6 years ago)
parenta9adb29
src/Text/Pandoc/Writers/CslJson.hs+1−1
@@ -47,7 +47,7 @@ writeCslJson _opts (Pandoc meta _) = do
4747 Left e -> throwError $ PandocCiteprocError e
4848 Right l -> return l
4949 let rs = case lookupMeta "references" meta of
50− Just (MetaList rs) -> rs
50+ Just (MetaList xs) -> xs
5151 _ -> []
5252 return $ UTF8.toText
5353 (toCslJson locale (mapMaybe metaValueToReference rs)) <> "\n"