aboutsummaryrefslogtreecommitdiffhomepage
path: root/src
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2019-11-28 21:34:54 +0000
committerSean Whitton <spwhitton@spwhitton.name>2019-11-28 21:34:54 +0000
commitfe4de681c5481f92c8f50f1eca8c636690323458 (patch)
tree79b5d15619b74b25ecece745eea55598f6ed01c2 /src
parent80f6d7a62539817c08f41ea46159c05ce9bc2915 (diff)
downloadpandoc-citeproc-preamble-fe4de681c5481f92c8f50f1eca8c636690323458.tar.gz
Select pandoc-citeproc's refs Div by its 'refs' identifier
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src')
-rw-r--r--src/pandoc-citeproc-preamble.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/pandoc-citeproc-preamble.hs b/src/pandoc-citeproc-preamble.hs
index 3453e49..b446579 100644
--- a/src/pandoc-citeproc-preamble.hs
+++ b/src/pandoc-citeproc-preamble.hs
@@ -2,7 +2,7 @@
pandoc-citeproc-preamble --- Insert a preamble before pandoc-citeproc's bibliography
- Copyright (C) 2015-2016 Sean Whitton
+ Copyright (C) 2015-2016, 2019 Sean Whitton
This file is part of pandoc-citeproc-preamble.
@@ -31,7 +31,7 @@ import Text.Pandoc.JSON
insertPreamble :: Block -> [Block] -> [Block]
insertPreamble preamble = foldr step []
where
- step refsDiv@(Div (_, ["references"], _) theRefs) xs =
+ step refsDiv@(Div ("refs", _, _) theRefs) xs =
-- check whether pandoc-citeproc actually inserted any
-- references
if null theRefs