@@ -272,7 +272,7 @@ bulletListItemToAsciiDoc opts blocks = do
272272 contents <- foldM addBlock empty blocks
273273 modify $ \s -> s{ bulletListLevel = lev }
274274 let marker = text (replicate lev '*')
275− return $ marker <> space <> contents <> cr
275+ return $ marker <> text " " <> contents <> cr
276276
277277-- | Convert ordered list item (a list of blocks) to asciidoc.
278278orderedListItemToAsciiDoc :: WriterOptions -- ^ options
@@ -292,7 +292,7 @@ orderedListItemToAsciiDoc opts marker blocks = do
292292 modify $ \s -> s{ orderedListLevel = lev + 1 }
293293 contents <- foldM addBlock empty blocks
294294 modify $ \s -> s{ orderedListLevel = lev }
295− return $ text marker <> space <> contents <> cr
295+ return $ text marker <> text " " <> contents <> cr
296296
297297-- | Convert definition list item (label, list of blocks) to asciidoc.
298298definitionListItemToAsciiDoc :: WriterOptions