aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2018-10-26 07:10:18 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2018-10-26 07:10:52 -0700
commit8899f8838e8c3fac266becc02984693a6229779b (patch)
treed10cad45dc9c2a0d7b5f1b170a12d0cb7ec48ef3
parent1ca320e249ab72a33e46ca1e73d36b1a818ce008 (diff)
downloadpandoc-8899f8838e8c3fac266becc02984693a6229779b.tar.gz
Man writer: don't wrap .SH and .SS lines.
Closes #5019.
-rw-r--r--src/Text/Pandoc/Writers/Man.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Man.hs b/src/Text/Pandoc/Writers/Man.hs
index b32d2ff6c..c4570f761 100644
--- a/src/Text/Pandoc/Writers/Man.hs
+++ b/src/Text/Pandoc/Writers/Man.hs
@@ -145,7 +145,7 @@ blockToMan opts (Header level _ inlines) = do
let heading = case level of
1 -> ".SH "
_ -> ".SS "
- return $ text heading <> contents
+ return $ nowrap $ text heading <> contents
blockToMan opts (CodeBlock _ str) = return $
text ".IP" $$
text ".nf" $$