diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2012-10-21 23:16:23 -0700 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2012-10-21 23:16:23 -0700 |
| commit | cfab8eaecb77f8c3a50bc7725d2cb4f2f3eca225 (patch) | |
| tree | 99ee8ca4a6c5384a10a665bff4aaab90e684721f /src/Text/Pandoc/Biblio.hs | |
| parent | bfddcb46dc2eda4e2c51457816824fe30fd39549 (diff) | |
| download | pandoc-cfab8eaecb77f8c3a50bc7725d2cb4f2f3eca225.tar.gz | |
Revert "LaTeX reader: Use new suppressParens option for footnote citations."
This reverts commit 7499499b68934ae6f3418940328c7fc2bd9fcadd.
Conflicts:
src/Text/Pandoc/Readers/LaTeX.hs
Diffstat (limited to 'src/Text/Pandoc/Biblio.hs')
| -rw-r--r-- | src/Text/Pandoc/Biblio.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Biblio.hs b/src/Text/Pandoc/Biblio.hs index e5b8fe197..934b9222e 100644 --- a/src/Text/Pandoc/Biblio.hs +++ b/src/Text/Pandoc/Biblio.hs @@ -111,10 +111,10 @@ getCitation i | Cite t _ <- i = [t] | otherwise = [] setHash :: Citation -> State Int Citation -setHash c = do +setHash (Citation i p s cm nn _) = do ident <- get put $ ident + 1 - return c{ citationHash = ident } + return $ Citation i p s cm nn ident toCslCite :: Citation -> CSL.Cite toCslCite c @@ -140,7 +140,6 @@ toCslCite c , CSL.citeNoteNumber = show $ citationNoteNum c , CSL.authorInText = fst citMode , CSL.suppressAuthor = snd citMode - , CSL.suppressParens = citationSuppressParens c , CSL.citeHash = citationHash c } |