aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2010-11-17 15:35:53 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2010-11-17 15:35:53 -0800
commit47c64d4fc4be8733615f3378e9a68c513c5710c2 (patch)
tree4558bca7906e57f70deeae2aec29a782368a2419 /src/Text/Pandoc/Readers
parentce9fc2a37d51e65bbfb25eed01cd400e183fb8d9 (diff)
downloadpandoc-47c64d4fc4be8733615f3378e9a68c513c5710c2.tar.gz
Don't pass a [Str ""] as citationPrefix.
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index 8101d3098..4975ee02f 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -1392,7 +1392,7 @@ citation = try $ do
key <- citeKey
loc <- option "" locator
return $ Citation{ citationId = key
- , citationPrefix = [Str pref]
+ , citationPrefix = if pref /= [] then [Str pref] else []
, citationSuffix = []
, citationLocator = loc
, citationMode = if suppress_auth