@@ -386,11 +386,12 @@ convertWithOpts opts = do
386386 withMediaBag . r readerOpts) sources
387387 return (mconcat (map fst pairs), mconcat (map snd pairs))
388388
389− jatsCSL <- readDataFile datadir "jats.csl"
390− let jatsEncoded = makeDataURI ("application/xml", jatsCSL)
391− let metadata = if format == "jats"
392− then ("csl", jatsEncoded) : optMetadata opts
393− else optMetadata opts
389+ metadata <- if format == "jats"
390+ then do
391+ jatsCSL <- readDataFile datadir "jats.csl"
392+ let jatsEncoded = makeDataURI ("application/xml", jatsCSL)
393+ return $ ("csl", jatsEncoded) : optMetadata opts
394+ else return $ optMetadata opts
394395
395396 runIO' $ do
396397 (doc, media) <- sourceToDoc sources