diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2019-11-28 21:34:54 +0000 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2019-11-28 21:34:54 +0000 |
commit | fe4de681c5481f92c8f50f1eca8c636690323458 (patch) | |
tree | 79b5d15619b74b25ecece745eea55598f6ed01c2 /src | |
parent | 80f6d7a62539817c08f41ea46159c05ce9bc2915 (diff) | |
download | pandoc-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.hs | 4 |
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 |