[parsing] Allow termination of mention nodes with any character except :
This commit is contained in:
parent
b84c3b5ff9
commit
a7dcfbe75a
1 changed files with 4 additions and 5 deletions
|
@ -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
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue