@@ -639,12 +639,12 @@ inline = choice [ str
639639 , symbol
640640 , ltSign ] <?> "inline"
641641
642−escapedChar = try $ do
642+escapedChar = do
643643 char '\\'
644644 state <- getState
645− result <- if stateStrict state
646− then oneOf "\\`*_{}[]()>#+-.!~"
647− else satisfy (not . isAlphaNum)
645+ result <- option '\\' $ if stateStrict state
646+ then oneOf "\\`*_{}[]()>#+-.!~"
647+ else satisfy (not . isAlphaNum)
648648 return $ Str [result]
649649
650650ltSign = do