- [fediverse] flipped predicate for notifications that does not need to be deleted from the server.

2025-01-09 01:52:39 +01:00 · 2024-09-08 13:57:29 +02:00 · 2024-09-08 13:57:29 +02:00 · faa123be35
commit faa123be35
parent d551505165
1 changed files with 4 additions and 4 deletions
--- a/src/api-client.lisp
+++ b/src/api-client.lisp
@ -821,10 +821,10 @@ numerical indices identifying the option voting for"
    :update))

 (defun safe-to-delete-notifications-type ()
-  (remove-if (lambda (a)
-               (member a
-                       '(:mention :follow-request)))
-             *all-notification-types*))
+  (remove-if-not (lambda (a)
+                   (member a
+                           '(:mention :follow-request)))
+                 *all-notification-types*))

 (defun notifications (max-id
                      &optional