Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Man writer: don't wrap .SH and .SS lines.

Browse source 
Closes #5019.
This commit is contained in:
John MacFarlane 2018-10-26 07:10:18 -07:00
parent 1ca320e249
commit 8899f8838e
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Text/Pandoc/Writers/Man.hs
View file

@ -145,7 +145,7 @@ blockToMan opts (Header level _ inlines) = do
let heading = case level of let heading = case level of
1 -> ".SH " 1 -> ".SH "
_ -> ".SS " _ -> ".SS "
return $ text heading <> contents return $ nowrap $ text heading <> contents
blockToMan opts (CodeBlock _ str) = return $ blockToMan opts (CodeBlock _ str) = return $
text ".IP" $$ text ".IP" $$
text ".nf" $$ text ".nf" $$