diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Readers/RTF.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/RTF.hs b/src/Text/Pandoc/Readers/RTF.hs index e781a9a09..c29a33b32 100644 --- a/src/Text/Pandoc/Readers/RTF.hs +++ b/src/Text/Pandoc/Readers/RTF.hs @@ -590,6 +590,9 @@ processTok bs (Tok pos tok') = do modifyGroup (\g -> g{ gSub = boolParam mbp }) ControlWord "super" mbp -> bs <$ modifyGroup (\g -> g{ gSuper = boolParam mbp }) + ControlWord "nosupersub" mbp -> bs <$ + modifyGroup (\g -> g{ gSuper = not $ boolParam mbp + , gSub = not $ boolParam mbp }) ControlWord "up" mbp -> bs <$ modifyGroup (\g -> g{ gSuper = boolParam mbp }) ControlWord "strike" mbp -> bs <$ |