aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2018-10-22 23:46:28 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2018-10-22 23:48:12 -0700
commit8b204dda775f0767056fefe5b18ac4a064b914c4 (patch)
treecebe6f2df596c1380f0781ba44c2686fb3c92541 /src/Text/Pandoc/Writers
parent7eea5c62ed28a8f2b5dedba18bc8a4c7c1215f3f (diff)
downloadpandoc-8b204dda775f0767056fefe5b18ac4a064b914c4.tar.gz
T.P.Writers.Groff - don't export escapeChar.
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/Groff.hs1
-rw-r--r--src/Text/Pandoc/Writers/Ms.hs2
2 files changed, 1 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/Groff.hs b/src/Text/Pandoc/Writers/Groff.hs
index a3b81d138..b7f039cc8 100644
--- a/src/Text/Pandoc/Writers/Groff.hs
+++ b/src/Text/Pandoc/Writers/Groff.hs
@@ -34,7 +34,6 @@ module Text.Pandoc.Writers.Groff (
, defaultWriterState
, MS
, Note
- , escapeChar
, escapeString
, escapeCode
, withFontFeature
diff --git a/src/Text/Pandoc/Writers/Ms.hs b/src/Text/Pandoc/Writers/Ms.hs
index ec7f9bf33..e077e9ed9 100644
--- a/src/Text/Pandoc/Writers/Ms.hs
+++ b/src/Text/Pandoc/Writers/Ms.hs
@@ -125,7 +125,7 @@ toSmallCaps opts (c:cs)
"\\s0" ++ toSmallCaps opts rest
| isUpper c = let (uppers,rest) = span isUpper (c:cs)
in escString opts uppers ++ toSmallCaps opts rest
- | otherwise = escapeChar (writerPreferAscii opts) c ++ toSmallCaps opts cs
+ | otherwise = escapeString (writerPreferAscii 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.