mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
ssh: ‘open-ssh-session’ displays the port number upon error.
* guix/ssh.scm (open-ssh-session): Show the port number in error message. Change-Id: I18a3dc54223bb29782dcdd43d3252c720525c31d
This commit is contained in:
parent
2931967720
commit
96802f490d
1 changed files with 3 additions and 3 deletions
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2016-2021, 2023 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2016-2021, 2023-2024 Ludovic Courtès <ludo@gnu.org>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -180,8 +180,8 @@ (define* (open-ssh-session host #:key user port identity
|
|||
(get-error session)))))))))))
|
||||
(x
|
||||
;; Connection failed or timeout expired.
|
||||
(raise (formatted-message (G_ "SSH connection to '~a' failed: ~a~%")
|
||||
host (get-error session)))))))
|
||||
(raise (formatted-message (G_ "SSH connection to '~a' port ~a failed: ~a~%")
|
||||
host (or port 22) (get-error session)))))))
|
||||
|
||||
(define* (remote-inferior session #:optional become-command)
|
||||
"Return a remote inferior for the given SESSION. If BECOME-COMMAND is
|
||||
|
|
Loading…
Reference in a new issue