diff options
Diffstat (limited to 'Pancake/Rendering.hs')
| -rw-r--r-- | Pancake/Rendering.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Pancake/Rendering.hs b/Pancake/Rendering.hs index 94f92f2..a917104 100644 --- a/Pancake/Rendering.hs +++ b/Pancake/Rendering.hs @@ -406,7 +406,7 @@ renderBlock (P.RawBlock _ s) = renderBlock (P.BlockQuote bs) = withIndent $ renderBlocks bs renderBlock (P.OrderedList _ bs) = do zipWithM_ (\b n -> modify (\s -> s { listing = Just (Ordered n) }) - >> keepIndent (mapM_ renderBlock b)) bs [1..] + >> keepIndent (renderBlocks b)) bs [1..] modify $ \s -> s { listing = Nothing } renderBlock (P.BulletList bs) = do mapM_ (\b -> modify (\s -> s { listing = Just Bulleted }) |