kreyren/guix-kreyren
1
0
Fork 0
Code Issues 1 Pull Requests 1 Releases Activity

ssh: 'open-ssh-session' gracefully handles connection timeouts.

Browse Source 
* guix/ssh.scm (open-ssh-session): Add case for 'again.
This commit is contained in:
Ludovic Courtès 2022-08-09 19:35:53 +02:00
parent 26bdefd172
commit 06ce4e3c06
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
guix/ssh.scm
View File

@ -162,6 +162,10 @@ server at '~a': ~a")
('success ('success
(session-set! session 'timeout timeout) (session-set! session 'timeout timeout)
session) session)
('again
(raise (formatted-message (G_ "timeout while connecting \
to SSH server at '~a'")
(session-get session 'host))))
(x (x
(match (userauth-gssapi! session) (match (userauth-gssapi! session)
('success ('success