diff --git a/src/api-client.lisp b/src/api-client.lisp index 074b46a..157b41a 100644 --- a/src/api-client.lisp +++ b/src/api-client.lisp @@ -354,7 +354,7 @@ Returns nil if the user did not provided a server in the configuration file" (defun update-pagination-statuses-so-far (statuses timeline folder &key (event-priority program-events:+standard-event-priority+)) - (loop for status in (nreverse (sort-id< statuses)) do + (loop for status in statuses do (let ((add-fetched-event (make-instance 'program-events:add-pagination-status-event :priority event-priority :status-id (tooter:id status)