diff options
author | John MacFarlane <jgm@berkeley.edu> | 2018-11-01 16:46:43 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2018-11-01 16:46:43 -0700 |
commit | e10d5b3d5bc4de124549762b1523575c7824ca28 (patch) | |
tree | 499293e700253e812afe87f6c5d758b35c43fc5b /src/Text | |
parent | 26341c163225c142d19af425af08049cb2eef446 (diff) | |
download | pandoc-e10d5b3d5bc4de124549762b1523575c7824ca28.tar.gz |
Change 'groff' -> 'roff'.
These formats (man, ms) are not groff-specific.
Diffstat (limited to 'src/Text')
-rw-r--r-- | src/Text/Pandoc/Pretty.hs | 2 | ||||
-rw-r--r-- | src/Text/Pandoc/Readers/Roff.hs | 4 | ||||
-rw-r--r-- | src/Text/Pandoc/Writers/Man.hs | 6 | ||||
-rw-r--r-- | src/Text/Pandoc/Writers/Ms.hs | 8 | ||||
-rw-r--r-- | src/Text/Pandoc/Writers/Roff.hs | 4 |
5 files changed, 12 insertions, 12 deletions
diff --git a/src/Text/Pandoc/Pretty.hs b/src/Text/Pandoc/Pretty.hs index f0990c1f8..ec1d36a68 100644 --- a/src/Text/Pandoc/Pretty.hs +++ b/src/Text/Pandoc/Pretty.hs @@ -432,7 +432,7 @@ nowrap doc = Doc $ mapWithIndex replaceSpace $ unDoc doc replaceSpace _ x = x -- | Content to print only if it comes at the beginning of a line, --- to be used e.g. for escaping line-initial `.` in groff man. +-- to be used e.g. for escaping line-initial `.` in roff man. afterBreak :: String -> Doc afterBreak s = Doc $ singleton (AfterBreak s) diff --git a/src/Text/Pandoc/Readers/Roff.hs b/src/Text/Pandoc/Readers/Roff.hs index 1283cf4e1..cd8ec94bd 100644 --- a/src/Text/Pandoc/Readers/Roff.hs +++ b/src/Text/Pandoc/Readers/Roff.hs @@ -29,7 +29,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA Stability : WIP Portability : portable -Tokenizer for groff formats (man, ms). +Tokenizer for roff formats (man, ms). -} module Text.Pandoc.Readers.Roff ( FontSpec(..) @@ -705,7 +705,7 @@ linePartsToString = mconcat . map go go (RoffStr s) = s go _ = mempty --- | Tokenize a string as a sequence of groff tokens. +-- | Tokenize a string as a sequence of roff tokens. lexRoff :: PandocMonad m => SourcePos -> T.Text -> m RoffTokens lexRoff pos txt = do eithertokens <- readWithM (do setPosition pos diff --git a/src/Text/Pandoc/Writers/Man.hs b/src/Text/Pandoc/Writers/Man.hs index 29e4aa718..6572760c3 100644 --- a/src/Text/Pandoc/Writers/Man.hs +++ b/src/Text/Pandoc/Writers/Man.hs @@ -27,7 +27,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA Stability : alpha Portability : portable -Conversion of 'Pandoc' documents to groff man page format. +Conversion of 'Pandoc' documents to roff man page format. -} module Text.Pandoc.Writers.Man ( writeMan) where @@ -55,7 +55,7 @@ writeMan :: PandocMonad m => WriterOptions -> Pandoc -> m Text writeMan opts document = evalStateT (pandocToMan opts document) defaultWriterState --- | Return groff man representation of document. +-- | Return roff man representation of document. pandocToMan :: PandocMonad m => WriterOptions -> Pandoc -> StateT WriterState m Text pandocToMan opts (Pandoc meta blocks) = do let colwidth = if writerWrapText opts == WrapAuto @@ -116,7 +116,7 @@ noteToMan opts num note = do return $ marker $$ contents -- We split inline lists into sentences, and print one sentence per --- line. groff/troff treats the line-ending period differently. +-- line. roff treats the line-ending period differently. -- See http://code.google.com/p/pandoc/issues/detail?id=148. -- | Convert Pandoc block element to man. diff --git a/src/Text/Pandoc/Writers/Ms.hs b/src/Text/Pandoc/Writers/Ms.hs index 6abc4bf93..202cb91ad 100644 --- a/src/Text/Pandoc/Writers/Ms.hs +++ b/src/Text/Pandoc/Writers/Ms.hs @@ -26,7 +26,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA Stability : alpha Portability : portable -Conversion of 'Pandoc' documents to groff ms format. +Conversion of 'Pandoc' documents to roff ms format. TODO: @@ -69,7 +69,7 @@ writeMs :: PandocMonad m => WriterOptions -> Pandoc -> m Text writeMs opts document = evalStateT (pandocToMs opts document) defaultWriterState --- | Return groff ms representation of document. +-- | Return roff ms representation of document. pandocToMs :: PandocMonad m => WriterOptions -> Pandoc -> MS m Text pandocToMs opts (Pandoc meta blocks) = do let colwidth = if writerWrapText opts == WrapAuto @@ -123,7 +123,7 @@ toSmallCaps opts (c:cs) | otherwise = escapeStr opts [c] ++ toSmallCaps opts cs -- We split inline lists into sentences, and print one sentence per --- line. groff/troff treats the line-ending period differently. +-- line. roff treats the line-ending period differently. -- See http://code.google.com/p/pandoc/issues/detail?id=148. blockToMs :: PandocMonad m @@ -372,7 +372,7 @@ inlineToMs opts (Strong lst) = inlineToMs opts (Strikeout lst) = do contents <- inlineListToMs opts lst -- we use grey color instead of strikeout, which seems quite - -- hard to do in groff for arbitrary bits of text + -- hard to do in roff for arbitrary bits of text return $ text "\\m[strikecolor]" <> contents <> text "\\m[]" inlineToMs opts (Superscript lst) = do contents <- inlineListToMs opts lst diff --git a/src/Text/Pandoc/Writers/Roff.hs b/src/Text/Pandoc/Writers/Roff.hs index 7bf0c5ee9..2650229f2 100644 --- a/src/Text/Pandoc/Writers/Roff.hs +++ b/src/Text/Pandoc/Writers/Roff.hs @@ -26,7 +26,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA Stability : alpha Portability : portable -Common functions for groff writers (man, ms). +Common functions for roff writers (man, ms). -} module Text.Pandoc.Writers.Roff ( @@ -89,7 +89,7 @@ combiningAccentsMap = Map.fromList combiningAccents essentialEscapes :: Map.Map Char String essentialEscapes = Map.fromList standardEscapes --- | Escape special characters for groff. +-- | Escape special characters for roff. escapeString :: EscapeMode -> String -> String escapeString _ [] = [] escapeString escapeMode ('\n':'.':xs) = |