diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2020-10-07 09:31:44 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2020-10-07 09:31:44 -0700 |
| commit | d2e4a83dc63e51a1c7cfb8668cbaad328a05c3a4 (patch) | |
| tree | 4dcdf5f066c1f1002a619839dd7643e14958b253 /src/Text/Pandoc | |
| parent | fd3809c33f663627f43168d347c7f2690a74b56f (diff) | |
| download | pandoc-d2e4a83dc63e51a1c7cfb8668cbaad328a05c3a4.tar.gz | |
Use latest citeproc.
Better solution to the problem of entities in CSL JSON output.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/CslJson.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/CslJson.hs b/src/Text/Pandoc/Writers/CslJson.hs index 95ffb34a7..02495799d 100644 --- a/src/Text/Pandoc/Writers/CslJson.hs +++ b/src/Text/Pandoc/Writers/CslJson.hs @@ -23,7 +23,6 @@ import qualified Data.Text as T import qualified Text.Pandoc.UTF8 as UTF8 import Text.Pandoc.Error import Text.Pandoc.Class -import Text.Pandoc.XML (fromEntities) import Control.Monad.Except (throwError) import Data.ByteString.Lazy (toStrict) import Data.ByteString (ByteString) @@ -86,6 +85,5 @@ toCslJson locale = toStrict . , confCompare = compare , confNumFormat = Generic } . map (runIdentity . traverse (return . - fromEntities . - renderCslJson locale . + renderCslJson False locale . foldMap fromInline)) |