mirror of https://codeberg.org/cage/tinmop/
- removed possible infinite loop when getting many notification (the exact number depends from from the server configuration, usually more then 15 notifications would remove the exit condition of the loop).
Thanks to the fediverse! :-)
This commit is contained in:
parent
b3d7d47f10
commit
e24f9f2911
|
@ -857,9 +857,8 @@ the latest 15 mentions)."
|
|||
(labels ((%notifications ()
|
||||
(when-let* ((min-id (tooter:id (first notifications-so-far)))
|
||||
(notifications (sort-id< (notifications min-id excluded-types))))
|
||||
|
||||
(loop for notification in notifications do
|
||||
(when (find notification notifications-so-far :test (make-id=))
|
||||
(when (not (find notification notifications-so-far :test (make-id=)))
|
||||
(hooks:run-hook 'hooks:*after-getting-fediverse-notification*
|
||||
notification)
|
||||
(push notification notifications-so-far)))
|
||||
|
|
Loading…
Reference in New Issue