diff options
Diffstat (limited to 'src/Text/Pandoc/Writers/Textile.hs')
| -rw-r--r-- | src/Text/Pandoc/Writers/Textile.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/Textile.hs b/src/Text/Pandoc/Writers/Textile.hs index 0f0b477a1..0a071c1f8 100644 --- a/src/Text/Pandoc/Writers/Textile.hs +++ b/src/Text/Pandoc/Writers/Textile.hs @@ -101,8 +101,8 @@ blockToTextile _ Null = return "" blockToTextile opts (Plain inlines) = inlineListToTextile opts inlines --- title beginning with \1 indicates that the image is a figure -blockToTextile opts (Para [Image txt (src,'\1':tit)]) = do +-- title beginning with fig: indicates that the image is a figure +blockToTextile opts (Para [Image txt (src,'f':'i':'g':':':tit)]) = do capt <- blockToTextile opts (Para txt) im <- inlineToTextile opts (Image txt (src,tit)) return $ im ++ "\n" ++ capt |