From c6590b193d0a05fa251a4ed2dff946615a896c78 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Tue, 23 Oct 2018 00:18:41 -0700
Subject: [PATCH] Man reader: handle \fS as a no-op.
This changes font, but to what? Can't find in documentation.
---
src/Text/Pandoc/Readers/Man.hs | 1 +
1 file changed, 1 insertion(+)
diff --git a/src/Text/Pandoc/Readers/Man.hs b/src/Text/Pandoc/Readers/Man.hs
index d93e3190b..dcdaad474 100644
--- a/src/Text/Pandoc/Readers/Man.hs
+++ b/src/Text/Pandoc/Readers/Man.hs
@@ -247,6 +247,7 @@ escapeLexer = try $ do
font <- choice
[ S.singleton <$> letterFontKind
, char '(' >> anyChar >> anyChar >> return (S.singleton Regular)
+ , char 'S' >> return (S.singleton Regular)
, try lettersFont
, digit >> return (S.singleton Regular)
]