mirror of https://codeberg.org/cage/tinmop/
- [GUI] used 'open-iri' to open the redirection iri.
This commit is contained in:
parent
f504a8be08
commit
053dc9aafc
|
@ -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+)
|
||||
|
|
Loading…
Reference in New Issue