diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2010-11-17 15:35:53 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2010-11-17 15:35:53 -0800 |
| commit | 47c64d4fc4be8733615f3378e9a68c513c5710c2 (patch) | |
| tree | 4558bca7906e57f70deeae2aec29a782368a2419 | |
| parent | ce9fc2a37d51e65bbfb25eed01cd400e183fb8d9 (diff) | |
| download | pandoc-47c64d4fc4be8733615f3378e9a68c513c5710c2.tar.gz | |
Don't pass a [Str ""] as citationPrefix.
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 |
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 |