From d1451411dd20c848998e8cdd01e4d8c43a514703 Mon Sep 17 00:00:00 2001 From: cage Date: Sun, 17 Sep 2023 14:41:59 +0200 Subject: [PATCH] - [GUI] renamed function. --- src/gui/client/main-window.lisp | 2 +- src/gui/client/stream-frame.lisp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/gui/client/main-window.lisp b/src/gui/client/main-window.lisp index 5f3bfc1..40b91c3 100644 --- a/src/gui/client/main-window.lisp +++ b/src/gui/client/main-window.lisp @@ -179,7 +179,7 @@ (ev:with-enqueued-process-and-unblock (program-events:+minimum-event-priority+) (client-stream-frame::refresh-all-streams (client-stream-frame::table (stream-frame main-window)) - #'client-stream-frame::all-rows-non-blocking)))) + #'client-stream-frame::make-requests-all-rows)))) (defun set-gemlog-toolbar-button-appearance (main-window iri) (if (comm:make-request :gemini-gemlog-subscribed-p 1 iri) diff --git a/src/gui/client/stream-frame.lisp b/src/gui/client/stream-frame.lisp index cb33fbe..af7aee9 100644 --- a/src/gui/client/stream-frame.lisp +++ b/src/gui/client/stream-frame.lisp @@ -47,7 +47,7 @@ (resync-rows stream-table new-rows) stream-table))) -(defun all-rows-non-blocking () +(defun make-requests-all-rows () (let ((rows (comm:make-request :gemini-all-stream-info 1))) (setf rows (sort rows (lambda (a b) (string< (getf a :download-iri)