cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

- enqueue the procedure to create a gopher window.

This commit is contained in:
cage 2022-09-25 11:02:52 +02:00
parent a949afb38e
commit e10a712b26
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/ui-goodies.lisp
View File

@ -2248,9 +2248,10 @@ Currently the only recognized protocols are gemini and kami."
(file-explorer-close-window)
(open-kami-address trimmed-url))
((text-utils:string-starts-with-p gopher-parser:+gopher-scheme+ trimmed-url)
(multiple-value-bind (host port type selector)
(gopher-parser:parse-iri trimmed-url)
(gopher-window::make-request host port type selector)))
(with-enqueued-process ()
(multiple-value-bind (host port type selector)
(gopher-parser:parse-iri trimmed-url)
(gopher-window::make-request host port type selector))))
(t
(open-gemini-address trimmed-url))))))
(if (null address)