From 1af2ebce4315e2fee9a41bcedbb2287395952ea6 Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Mon, 7 Nov 2011 11:03:33 -0800
Subject: [PATCH] Biblio - fixed author-in-text citations so they don't double.
---
src/Text/Pandoc/Biblio.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/Text/Pandoc/Biblio.hs b/src/Text/Pandoc/Biblio.hs
index 9f1e93791..1b0017a00 100644
--- a/src/Text/Pandoc/Biblio.hs
+++ b/src/Text/Pandoc/Biblio.hs
@@ -71,7 +71,7 @@ processCite s cs (Cite t _) =
then [Cite t $ renderPandoc s [x] ++
if null xs
then []
- else [Space, Cite t $ renderPandoc s xs]]
+ else Space : renderPandoc s xs]
else [Cite t $ renderPandoc s (x:xs)]
_ -> [Str ("Error processing " ++ show t)]
processCite _ _ x = [x]