aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/AsciiDoc.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2013-01-15 08:45:46 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2013-01-15 08:46:09 -0800
commit7bc37e4414fc34574e5c0dbbef86d165405f9cff (patch)
tree8a7c323385a44066f983df9bf2474fed6f0a6010 /src/Text/Pandoc/Writers/AsciiDoc.hs
parent1a4b47e93368bfbd31daccdfedbd9527ee740201 (diff)
downloadpandoc-7bc37e4414fc34574e5c0dbbef86d165405f9cff.tar.gz
Use 'fig:' instead of '\SOH' in title to indicate figure.
Revises 1a4b47e93368bfbd31daccdfedbd9527ee740201
Diffstat (limited to 'src/Text/Pandoc/Writers/AsciiDoc.hs')
-rw-r--r--src/Text/Pandoc/Writers/AsciiDoc.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/AsciiDoc.hs b/src/Text/Pandoc/Writers/AsciiDoc.hs
index 93d18eff8..3718431e2 100644
--- a/src/Text/Pandoc/Writers/AsciiDoc.hs
+++ b/src/Text/Pandoc/Writers/AsciiDoc.hs
@@ -116,7 +116,7 @@ blockToAsciiDoc _ Null = return empty
blockToAsciiDoc opts (Plain inlines) = do
contents <- inlineListToAsciiDoc opts inlines
return $ contents <> cr
-blockToAsciiDoc opts (Para [Image alt (src,'\1':tit)]) =
+blockToAsciiDoc opts (Para [Image alt (src,'f':'i':'g':':':tit)]) =
blockToAsciiDoc opts (Para [Image alt (src,tit)])
blockToAsciiDoc opts (Para inlines) = do
contents <- inlineListToAsciiDoc opts inlines