summaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Citeproc.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Citeproc.hs b/src/Text/Pandoc/Citeproc.hs
index 2530ef46f..c7d4804d2 100644
--- a/src/Text/Pandoc/Citeproc.hs
+++ b/src/Text/Pandoc/Citeproc.hs
@@ -93,8 +93,8 @@ processCitations (Pandoc meta bs) = do
B.divWith ("ref-" <> ident,["csl-entry"],[]) . B.para .
insertSpace $ out)
(resultBibliography result)
- let moveNotes = styleIsNoteStyle sopts &&
- maybe True truish (lookupMeta "notes-after-punctuation" meta)
+ let moveNotes = maybe (styleIsNoteStyle sopts) truish
+ (lookupMeta "notes-after-punctuation" meta)
let cits = resultCitations result
let metanocites = lookupMeta "nocite" meta