diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2020-09-27 16:03:31 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2020-09-27 16:03:31 -0700 |
| commit | eff6b8f27d482ae56e49752d38bd985734a2b414 (patch) | |
| tree | ffb1c2b97df82cba3572c80f25d6eac7fd0b22f8 /src/Text/Pandoc/Citeproc | |
| parent | ae4dcc0d4a66b30991babf080de23c08ac37cf90 (diff) | |
| download | pandoc-eff6b8f27d482ae56e49752d38bd985734a2b414.tar.gz | |
Use latest citeproc.
Diffstat (limited to 'src/Text/Pandoc/Citeproc')
| -rw-r--r-- | src/Text/Pandoc/Citeproc/BibTeX.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Citeproc/BibTeX.hs b/src/Text/Pandoc/Citeproc/BibTeX.hs index 607442adb..a611c1850 100644 --- a/src/Text/Pandoc/Citeproc/BibTeX.hs +++ b/src/Text/Pandoc/Citeproc/BibTeX.hs @@ -30,8 +30,7 @@ import Text.Pandoc.Error (PandocError) import Text.Pandoc.Shared (stringify) import qualified Text.Pandoc.Walk as Walk import Citeproc.Types -import Citeproc.CaseTransform (withSentenceCase) -import Citeproc.Pandoc (caseTransform) +import Citeproc.Pandoc import Text.Pandoc.Citeproc.Util (toIETF) import Text.Pandoc.Citeproc.Data (biblatexStringMap) import Data.Default @@ -736,7 +735,7 @@ protectCase f = Walk.walk unprotect . f . Walk.walk protect startsWithLowercase _ = False unTitlecase :: Maybe Lang -> Inlines -> Inlines -unTitlecase mblang = protectCase (caseTransform (withSentenceCase mblang)) +unTitlecase mblang = protectCase (addTextCase mblang SentenceCase) getTitle :: Text -> Bib Inlines getTitle f = do |