Start rendering with zero indentation

A minor fix: `renderDoc` used to call `renderBlocks`, which increases
indentation at once, giving a minimum indentation level of 1.

1 files changed, 1 insertions, 1 deletions

diff --git a/Pancake.hs b/Pancake.hs
index b637754..939ca6d 100644
--- a/Pancake.hs
+++ b/Pancake.hs
@@ -498,7 +498,7 @@ renderDoc (P.Pandoc _ blocks) = do
   term <- liftIO TI.setupTermFromEnv
   st <- get
   let cols = maybe 80 id $ TI.getCapability term TI.termColumns
-      l = runRenderer cols $ renderBlocks blocks
+      l = runRenderer cols $ mapM_ renderBlock blocks
       textLines = rights l
   modify (\s -> s { links = lefts l })
   if embedded st