git.iko.soy/typeable/pandoc
on master help sign in
Use isNothing.
c2eb7d0John MacFarlane
src/Text/Pandoc/App.hs+2−2
compare with master
unifiedsplit
@@ -413,8 +413,8 @@ convertWithOpts opts = do
413 mconcat <$> mapM (readFile' >=> r readerOpts) sources
413 mconcat <$> mapM (readFile' >=> r readerOpts) sources
414
414
415 metadata <- if format == "jats" &&
415 metadata <- if format == "jats" &&
416− lookup "csl" (optMetadata opts) == Nothing &&
416+ isNothing (lookup "csl" (optMetadata opts)) &&
417− lookup "citation-style" (optMetadata opts) == Nothing
417+ isNothing (lookup "citation-style" (optMetadata opts))
418 then do
418 then do
419 jatsCSL <- readDataFile datadir "jats.csl"
419 jatsCSL <- readDataFile datadir "jats.csl"
420 let jatsEncoded = makeDataURI ("application/xml", jatsCSL)
420 let jatsEncoded = makeDataURI ("application/xml", jatsCSL)