diff --git a/src/gui/client/main-window.lisp b/src/gui/client/main-window.lisp index 8044480..cc15cb4 100644 --- a/src/gui/client/main-window.lisp +++ b/src/gui/client/main-window.lisp @@ -876,10 +876,13 @@ local file paths." ((gemini-client:absolute-titan-url-p actual-iri) (client-titan-window:init-window main-window actual-iri)) ((gemini-parser:gemini-iri-p actual-iri) - (start-stream-iri (iri-ensure-path actual-iri) - main-window - use-cache - status)) + (let ((stream-frame (stream-frame main-window))) + (start-stream-iri (iri-ensure-path actual-iri) + main-window + use-cache + status) + (client-stream-frame::refresh-all-streams + (client-stream-frame::table stream-frame)))) ((or (null (uri:scheme parsed-iri)) (string= (uri:scheme parsed-iri) constants:+file-scheme+))