[parsing] Make EmojiCodeNode parser match EmojiService.CustomEmojiRegex
This commit is contained in:
parent
ca56b93524
commit
8828c20b71
1 changed files with 1 additions and 1 deletions
|
@ -214,7 +214,7 @@ module private MfmParser =
|
||||||
|>> fun f -> MfmMathBlockNode(f) :> MfmNode
|
|>> fun f -> MfmMathBlockNode(f) :> MfmNode
|
||||||
|
|
||||||
let emojiCodeNode =
|
let emojiCodeNode =
|
||||||
skipChar ':' >>. manyCharsTill letter (skipChar ':')
|
skipChar ':' >>. manyCharsTill (satisfy isAsciiLetter <|> anyOf "+-_") (skipChar ':')
|
||||||
|>> fun e -> MfmEmojiCodeNode(e) :> MfmNode
|
|>> fun e -> MfmEmojiCodeNode(e) :> MfmNode
|
||||||
|
|
||||||
let plainNode =
|
let plainNode =
|
||||||
|
|
Loading…
Add table
Reference in a new issue