JATS writer: don't include jats.csl in metadata if csl already specified.

This commit is contained in:
John MacFarlane 2017-03-31 15:15:49 +02:00
parent 8a3ef99882
commit 80c3c93273

View file

@ -404,7 +404,9 @@ convertWithOpts opts = do
withMediaBag . r readerOpts) sources
return (mconcat (map fst pairs), mconcat (map snd pairs))
metadata <- if format == "jats"
metadata <- if format == "jats" &&
lookup "csl" (optMetadata opts) == Nothing &&
lookup "citation-style" (optMetadata opts) == Nothing
then do
jatsCSL <- readDataFile datadir "jats.csl"
let jatsEncoded = makeDataURI ("application/xml", jatsCSL)