diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2012-11-04 18:33:35 -0800 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2012-11-04 18:33:35 -0800 |
| commit | 9d0b011869d06be2e540feac99070683e10d33da (patch) | |
| tree | 2733913b339968961d9165e2474212519abac93d /src/Text/Pandoc | |
| parent | 1f29592b64245527a493feccd99d5c0f28b572cf (diff) | |
| download | pandoc-9d0b011869d06be2e540feac99070683e10d33da.tar.gz | |
RST writer: Don't add ":align: center" to figures.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/RST.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/RST.hs b/src/Text/Pandoc/Writers/RST.hs index 4fb00e2b4..f025e6c81 100644 --- a/src/Text/Pandoc/Writers/RST.hs +++ b/src/Text/Pandoc/Writers/RST.hs @@ -149,9 +149,8 @@ blockToRST (Plain inlines) = inlineListToRST inlines blockToRST (Para [Image txt (src,tit)]) = do capt <- inlineListToRST txt let fig = "figure:: " <> text src - let align = ":align: center" let alt = ":alt: " <> if null tit then capt else text tit - return $ hang 3 ".. " $ fig $$ align $$ alt $+$ capt $$ blankline + return $ hang 3 ".. " $ fig $$ alt $+$ capt $$ blankline blockToRST (Para inlines) = do contents <- inlineListToRST inlines return $ contents <> blankline |