aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorAlbert Krewinkel <albert@zeitkraut.de>2016-10-17 22:11:03 +0200
committerAlbert Krewinkel <albert@zeitkraut.de>2016-10-17 22:11:03 +0200
commit1266b210ac51273cdfe2913fb1d710e1a20f5e9b (patch)
tree639187068471e0717f574740d563cc7a46a3ec18 /src/Text/Pandoc/Writers
parentf407b66405d4619d99a877c8332a6458fb8a4bbe (diff)
downloadpandoc-1266b210ac51273cdfe2913fb1d710e1a20f5e9b.tar.gz
Org writer: drop space before footnote markers
The writer no longer adds an extra space before footnote markers. Fixes: #3162
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/Org.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Org.hs b/src/Text/Pandoc/Writers/Org.hs
index a74481171..18a820f2e 100644
--- a/src/Text/Pandoc/Writers/Org.hs
+++ b/src/Text/Pandoc/Writers/Org.hs
@@ -373,7 +373,7 @@ inlineToOrg (Note contents) = do
notes <- get >>= (return . stNotes)
modify $ \st -> st { stNotes = contents:notes }
let ref = show $ (length notes) + 1
- return $ " [" <> text ref <> "]"
+ return $ "[" <> text ref <> "]"
orgPath :: String -> String
orgPath src =