aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/CslJson.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc/Writers/CslJson.hs')
-rw-r--r--src/Text/Pandoc/Writers/CslJson.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/CslJson.hs b/src/Text/Pandoc/Writers/CslJson.hs
index 4f4fad212..3a8f6f5b1 100644
--- a/src/Text/Pandoc/Writers/CslJson.hs
+++ b/src/Text/Pandoc/Writers/CslJson.hs
@@ -48,7 +48,7 @@ writeCslJson _opts (Pandoc meta _) = do
Right l -> return l
case lookupMeta "references" meta of
Just (MetaList rs) -> return $ (UTF8.toText $
- toCslJson locale (mapMaybe (metaValueToReference (const True)) rs))
+ toCslJson locale (mapMaybe metaValueToReference rs))
<> "\n"
_ -> throwError $ PandocAppError "No references field"