From 053dc9aafc1687eac372b85a95fa99c34a8a8ba6 Mon Sep 17 00:00:00 2001 From: cage Date: Wed, 25 Sep 2024 18:50:09 +0200 Subject: [PATCH] - [GUI] used 'open-iri' to open the redirection iri. --- src/gui/client/main-window.lisp | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/src/gui/client/main-window.lisp b/src/gui/client/main-window.lisp index e223ab4..6762e06 100644 --- a/src/gui/client/main-window.lisp +++ b/src/gui/client/main-window.lisp @@ -1377,11 +1377,10 @@ local file paths." (let ((redirect-iri (if (iri:absolute-url-p meta) (remove-standard-port meta) (absolutize-link iri meta)))) - (start-stream-iri redirect-iri - main-window - use-cache - :status status - :ignore-certificate-expiration ignore-certificate-expiration)))) + (open-iri redirect-iri + main-window + t + :status status)))) ((gemini-client:header-success-p status-code) (cond ((eq status +stream-status-streaming+)