[parsing] Allow termination of mention nodes with any character except :

This commit is contained in:
Laura Hausmann 2024-06-13 22:06:20 +02:00
parent b84c3b5ff9
commit a7dcfbe75a
No known key found for this signature in database
GPG key ID: D044E84C5BE01605

View file

@ -239,9 +239,8 @@ module private MfmParser =
.>>. opt (skipChar '@' >>. domain) .>>. opt (skipChar '@' >>. domain)
.>> (lookAhead .>> (lookAhead
<| choice <| choice
[ spaces1 [ eof
eof skipNoneOf ":"
skipAnyOf "()[].,;?*~\'"
skipChar ':' .>> nextCharSatisfiesNot isAsciiLetterOrNumber ]) skipChar ':' .>> nextCharSatisfiesNot isAsciiLetterOrNumber ])
|>> fun (user: string, host: string option) -> MfmMentionNode(acct (user, host), user, host) :> MfmNode |>> fun (user: string, host: string option) -> MfmMentionNode(acct (user, host), user, host) :> MfmNode