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

- [gemini] using asynchronous timeout instead when opening a socket as the function to open a socket does not respect deadline established with 'sb-sys:with-deadline'.

This commit is contained in:
cage 2024-09-04 18:44:27 +02:00
parent 165bb30688
commit a300c35c8c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/gemini/client.lisp
View File

@ -441,7 +441,7 @@
(usocket:socket-connect hostname (usocket:socket-connect hostname
port port
:element-type '(unsigned-byte 8)))) :element-type '(unsigned-byte 8))))
#+sbcl (sb-sys:with-deadline (:seconds +open-socket-response-deadline+) #+sbcl (sb-ext:with-timeout +open-socket-response-deadline+
(open-socket (idn:host-unicode->ascii host))) (open-socket (idn:host-unicode->ascii host)))
#-sbcl (open-socket (idn:host-unicode->ascii host)))) #-sbcl (open-socket (idn:host-unicode->ascii host))))