diff options
| -rw-r--r-- | src/pandoc.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/pandoc.hs b/src/pandoc.hs index 7b5d5fae5..db98f41ee 100644 --- a/src/pandoc.hs +++ b/src/pandoc.hs @@ -934,8 +934,8 @@ main = do then UTF8.readFile cslfile else do csldir <- getAppUserDataDirectory "csl" - readDataFile datadir (replaceDirectory - (replaceExtension cslfile "csl") csldir) + readDataFile (Just csldir) + (replaceExtension cslfile "csl") abbrevs <- maybe (return []) CSL.readJsonAbbrevFile cslabbrevs return $ Just csl { CSL.styleAbbrevs = abbrevs } else return Nothing |