Man reader: handle \fS as a no-op.

This changes font, but to what?  Can't find in documentation.
This commit is contained in:
John MacFarlane 2018-10-23 00:18:41 -07:00
parent 8b82667f8a
commit c6590b193d

View file

@ -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)
]