diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2018-10-24 08:51:42 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2018-10-24 08:51:42 -0700 |
| commit | bac25e82d3f588119eab4219322691c8a8fb0847 (patch) | |
| tree | 0fd6e24ea48090ee49cf46463ce746c9255fa3a7 /src/Text | |
| parent | f859162554557cef27432cc95272e915ecbf301a (diff) | |
| download | pandoc-bac25e82d3f588119eab4219322691c8a8fb0847.tar.gz | |
Rename manEscapes -> standardEscapes
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/GroffChar.hs | 6 | ||||
| -rw-r--r-- | src/Text/Pandoc/Writers/Groff.hs | 4 |
2 files changed, 5 insertions, 5 deletions
diff --git a/src/Text/Pandoc/GroffChar.hs b/src/Text/Pandoc/GroffChar.hs index efb3cf11a..6d2eff98b 100644 --- a/src/Text/Pandoc/GroffChar.hs +++ b/src/Text/Pandoc/GroffChar.hs @@ -31,15 +31,15 @@ Groff character escaping/unescaping. -} module Text.Pandoc.GroffChar ( - manEscapes + standardEscapes , characterCodes , combiningAccents ) where import Prelude -- | These are the escapes specifically mentioned in groff_man(7). -manEscapes :: [(Char, String)] -manEscapes = +standardEscapes :: [(Char, String)] +standardEscapes = [ ('\160', "\\ ") , ('\'', "\\[aq]") , ('‘', "\\[oq]") diff --git a/src/Text/Pandoc/Writers/Groff.hs b/src/Text/Pandoc/Writers/Groff.hs index b0e8d3d06..5d51314bb 100644 --- a/src/Text/Pandoc/Writers/Groff.hs +++ b/src/Text/Pandoc/Writers/Groff.hs @@ -47,7 +47,7 @@ import Text.Pandoc.Class (PandocMonad) import Text.Pandoc.Definition import Text.Pandoc.Pretty import Text.Printf (printf) -import Text.Pandoc.GroffChar (manEscapes, +import Text.Pandoc.GroffChar (standardEscapes, characterCodes, combiningAccents) data WriterState = WriterState { stHasInlineMath :: Bool @@ -87,7 +87,7 @@ combiningAccentsMap :: Map.Map Char String combiningAccentsMap = Map.fromList combiningAccents essentialEscapes :: Map.Map Char String -essentialEscapes = Map.fromList manEscapes +essentialEscapes = Map.fromList standardEscapes -- | Escape special characters for groff. escapeString :: EscapeMode -> String -> String |