git.iko.soy/typeable/pandoc
on master help sign in
Fixed bug in fetching CSL files from CSL data directory.
b63566fJohn MacFarlane
src/pandoc.hs+2−2
compare with master
unifiedsplit
@@ -934,8 +934,8 @@ main = do
934 then UTF8.readFile cslfile
934 then UTF8.readFile cslfile
935 else do
935 else do
936 csldir <- getAppUserDataDirectory "csl"
936 csldir <- getAppUserDataDirectory "csl"
937− readDataFile datadir (replaceDirectory
937+ readDataFile (Just csldir)
938− (replaceExtension cslfile "csl") csldir)
938+ (replaceExtension cslfile "csl")
939 abbrevs <- maybe (return []) CSL.readJsonAbbrevFile cslabbrevs
939 abbrevs <- maybe (return []) CSL.readJsonAbbrevFile cslabbrevs
940 return $ Just csl { CSL.styleAbbrevs = abbrevs }
940 return $ Just csl { CSL.styleAbbrevs = abbrevs }
941 else return Nothing
941 else return Nothing