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

- [GUI] fixed regression, opening non gemini absolute IRI was not possible.

This commit is contained in:
cage 2024-09-22 13:46:44 +02:00
parent dcda3f91ad
commit 6b81d0eefd
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/gui/client/main-window.lisp
View File

@ -1177,6 +1177,8 @@ local file paths."
:status status) :status status)
(client-stream-frame::refresh-all-streams (client-stream-frame::refresh-all-streams
(client-stream-frame::table stream-frame)))) (client-stream-frame::table stream-frame))))
((iri:absolute-url-p iri)
(client-os-utils:open-resource-with-external-program main-window iri))
((or (fs:file-exists-p actual-iri) ((or (fs:file-exists-p actual-iri)
(fs:directory-exists-p actual-iri)) (fs:directory-exists-p actual-iri))
(initialize-ir-lines main-window) (initialize-ir-lines main-window)

2
src/html-utils.lisp
View File

@ -121,7 +121,7 @@
(quote-prefix "> ") (list-item-prefix "* ")) (quote-prefix "> ") (list-item-prefix "* "))
"Transform html to text, note that if `add-link-footnotes` is non nil footnotes that marks html link in the text are added aftere the body of the message "Transform html to text, note that if `add-link-footnotes` is non nil footnotes that marks html link in the text are added aftere the body of the message
This function uses a library that transform html5 text into s-expressions um the form This function uses a library that transform html5 text into s-expressions in the form
'(name (attributes) children*) '(name (attributes) children*)