diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2014-03-12 10:23:45 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2014-03-12 10:23:45 -0700 |
| commit | 76ef65f0b36d3a613e004350609d3696d0bf5658 (patch) | |
| tree | d1cef865fbc0be9263e8c337b6e5e086434fff27 /src/Text/Pandoc/Writers/Man.hs | |
| parent | c3a2fc643cad7a5d75e0c576aa029a7ec51b8eed (diff) | |
| download | pandoc-76ef65f0b36d3a613e004350609d3696d0bf5658.tar.gz | |
Man writer: Ensure that terms in definition lists aren't line wrapped.
Closes #1195.
Diffstat (limited to 'src/Text/Pandoc/Writers/Man.hs')
| -rw-r--r-- | src/Text/Pandoc/Writers/Man.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Man.hs b/src/Text/Pandoc/Writers/Man.hs index b31cc2b70..680bfef44 100644 --- a/src/Text/Pandoc/Writers/Man.hs +++ b/src/Text/Pandoc/Writers/Man.hs @@ -283,7 +283,7 @@ definitionListItemToMan opts (label, defs) = do mapM (\item -> blockToMan opts item) rest first' <- blockToMan opts first return $ first' $$ text ".RS" $$ rest' $$ text ".RE" - return $ text ".TP" $$ text ".B " <> labelText $$ contents + return $ text ".TP" $$ nowrap (text ".B " <> labelText) $$ contents -- | Convert list of Pandoc block elements to man. blockListToMan :: WriterOptions -- ^ Options |