diff --git a/src/gui/client/stream-frame.lisp b/src/gui/client/stream-frame.lisp index e0d9cbc..4103010 100644 --- a/src/gui/client/stream-frame.lisp +++ b/src/gui/client/stream-frame.lisp @@ -86,9 +86,10 @@ (selection (first selections))) (let* ((url (gui:id selection)) (new-rows (all-rows))) - (client-main-window:set-address-bar-text gui-goodies:*main-frame* url) - (client-main-window::open-iri url gui-goodies:*main-frame* t) - (resync-rows stream-table new-rows)))))) + (ev:with-enqueued-process-and-unblock () + (client-main-window:set-address-bar-text gui-goodies:*main-frame* url) + (client-main-window::open-iri url gui-goodies:*main-frame* t) + (resync-rows stream-table new-rows))))))) (defun init-frame (parent-frame) (let* ((wrapper-frame (make-instance 'stream-frame :master parent-frame))