@@ -824,7 +824,7 @@ inlineText :: LP Inlines
824inlineText = str <$> many1 inlineChar
824inlineText = str <$> many1 inlineChar
826inlineChar :: LP Char
826inlineChar :: LP Char
827−inlineChar = noneOf "\\$%^_&~#{}^'`\"‘’“”-[] \t\n"
827+inlineChar = noneOf "\\$%&~#{}^'`\"‘’“”-[] \t\n"
829environment :: LP Blocks
829environment :: LP Blocks
830environment = do
830environment = do