cage/tinmop
1
0
Fork 0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-02-23 09:07:37 +01:00
Code Issues

- [FEDIVERSE API] removed a recursive lock grabbing when updating conversations.

Browse Source
This commit is contained in:
cage 2025-01-10 22:12:45 +01:00
parent 84be6d48f9
commit 905fd29171
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/api-client.lisp
View File

@ -566,9 +566,12 @@ database."
(ignore-errors
(tooter:find-status *client* status-id)))
(defun get-status-context-no-lock (status-id)
(tooter:context *client* status-id))
(defun-api-call get-status-context (status-id)
"Get a parent and a child of a status (identified by `status-id'), if exists"
(tooter:context *client* status-id))
(get-status-context-no-lock status-id))
(defun-api-call send-status (content
in-reply-to-id
@ -1030,7 +1033,7 @@ node-status-id is not a leaf)."
(let ((res (copy-list fetched-branch)))
(labels ((descend (node-id)
(when node-id
(let* ((context (get-status-context node-id))
(let* ((context (get-status-context-no-lock node-id))
(children (tooter:descendants context)))
(loop for child in children do
(when (not (find child res :test (make-id=)))