diff options
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/Writers/RST.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/RST.hs b/src/Text/Pandoc/Writers/RST.hs index 434cd1cf7..e2b55daa0 100644 --- a/src/Text/Pandoc/Writers/RST.hs +++ b/src/Text/Pandoc/Writers/RST.hs @@ -225,7 +225,7 @@ blockToRST opts (DefinitionList items) = do bulletListItemToRST :: WriterOptions -> [Block] -> State WriterState Doc bulletListItemToRST opts items = do contents <- blockListToRST opts items - return $ hang (text "- ") (writerTabStop opts) contents + return $ hang (text "- ") 3 contents -- | Convert ordered list item (a list of blocks) to RST. orderedListItemToRST :: WriterOptions -- ^ options @@ -234,7 +234,7 @@ orderedListItemToRST :: WriterOptions -- ^ options -> State WriterState Doc orderedListItemToRST opts marker items = do contents <- blockListToRST opts items - return $ hang (text marker) (writerTabStop opts) contents + return $ hang (text marker) (length marker + 1) contents -- | Convert defintion list item (label, list of blocks) to RST. definitionListItemToRST :: WriterOptions -> ([Inline], [Block]) -> State WriterState Doc |