Remove default 4-column margin

silby · Mar 26, 2024 · c0b8fa3 · c0b8fa3
1 parent 69c2c68
commit c0b8fa3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Text/Pandoc/Writers/ANSI.hs b/src/Text/Pandoc/Writers/ANSI.hs
@@ -80,7 +80,7 @@ pandocToANSI opts (Pandoc meta blocks) = do
   let hangWidth = foldr (max . D.offset) 0 marks
   let notepretty | not (null notes) = D.cblock width hr $+$ hangMarks hangWidth marks notes
                  | otherwise = D.empty
-  let main = D.nest 4 $ body $+$ notepretty
+  let main = body $+$ notepretty
   let context = defField "body" main
               $ defField "titleblock" title metadata
   return $