diff options
Diffstat (limited to 'Text/Pandoc/Writers/Man.hs')
| -rw-r--r-- | Text/Pandoc/Writers/Man.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Text/Pandoc/Writers/Man.hs b/Text/Pandoc/Writers/Man.hs index 71bda8e88..d96825927 100644 --- a/Text/Pandoc/Writers/Man.hs +++ b/Text/Pandoc/Writers/Man.hs @@ -128,7 +128,7 @@ blockToMan opts (Header level inlines) = do 1 -> ".SH " _ -> ".SS " return $ text heading <> contents -blockToMan opts (CodeBlock str) = return $ +blockToMan opts (CodeBlock _ str) = return $ text ".PP" $$ text "\\f[CR]" $$ text ((unlines . map (" " ++) . lines) (escapeCode str)) <> text "\\f[]" blockToMan opts (BlockQuote blocks) = do |