@@ -43,12 +43,12 @@ import Control.Monad
4343
4444-- | Process a 'Pandoc' document by adding citations formatted
4545-- according to a CSL style, using 'citeproc' from citeproc-hs.
46−processBiblio :: FilePath -> Maybe FilePath -> [Reference] -> Pandoc
46+processBiblio :: String -> Maybe FilePath -> [Reference] -> Pandoc
4747 -> IO Pandoc
48−processBiblio cslfile abrfile r p
48+processBiblio cslStr abrfile r p
4949 = if null r then return p
5050 else do
51− csl <- readCSLFile cslfile
51+ csl <- parseCSL cslStr
5252 abbrevs <- case abrfile of
5353 Just f -> readJsonAbbrevFile f
5454 Nothing -> return []