cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

- [fediverse] fixed mention extraction's regexp.

This commit is contained in:
cage 2024-12-02 19:48:45 +01:00
parent 2d95fb2e36
commit 8322288292
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/message-rendering-utils.lisp
View File

@ -89,14 +89,14 @@ followed by different acct e.g.:
local-mention
"([^"
+mention-prefix+
"\\w]|$)"))
"\\w\\s]|$)"))
(rest-re-register (nth-value 1 (scan-to-strings local-mention-re results)))
(rest-re (when (not (vector-empty-p rest-re-register))
(elt rest-re-register 1)))
(replaced (funcall replace-function
local-mention-re
results
(strcat " "actual-mention))))
(strcat " " actual-mention))))
(if rest-re
(setf results (strcat replaced rest-re))
(setf results (strcat replaced " "))))))