From 8828c20b71ccb284128f665303b84720860a9f5d Mon Sep 17 00:00:00 2001
From: Laura Hausmann <laura@hausmann.dev>
Date: Sun, 28 Apr 2024 00:22:56 +0200
Subject: [PATCH] [parsing] Make EmojiCodeNode parser match
 EmojiService.CustomEmojiRegex

---
 Iceshrimp.Parsing/Mfm.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Iceshrimp.Parsing/Mfm.fs b/Iceshrimp.Parsing/Mfm.fs
index 74549508..5cd170aa 100644
--- a/Iceshrimp.Parsing/Mfm.fs
+++ b/Iceshrimp.Parsing/Mfm.fs
@@ -214,7 +214,7 @@ module private MfmParser =
         |>> fun f -> MfmMathBlockNode(f) :> MfmNode
 
     let emojiCodeNode =
-        skipChar ':' >>. manyCharsTill letter (skipChar ':')
+        skipChar ':' >>. manyCharsTill (satisfy isAsciiLetter <|> anyOf "+-_") (skipChar ':')
         |>> fun e -> MfmEmojiCodeNode(e) :> MfmNode
 
     let plainNode =