01/08: machine: ssh: Deprecate missing 'host-key' field.

[guix-commits]

civodul pushed a commit to branch wip-system-bootstrap
in repository guix.

commit ea86b1b6e3851a3735028a21366ab843f33bbdc0
Author: Ludovic Courtès <address@hidden>
Date:   Fri Dec 6 13:21:11 2019 +0100

    machine: ssh: Deprecate missing 'host-key' field.
    
    * gnu/machine/ssh.scm (machine-ssh-session): Warn about missing host key.
---
 gnu/machine/ssh.scm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/gnu/machine/ssh.scm b/gnu/machine/ssh.scm
index 23ae917..1b88fb4 100644
--- a/gnu/machine/ssh.scm
+++ b/gnu/machine/ssh.scm
@@ -103,6 +103,9 @@ one from the configuration's parameters if one was not 
provided."
               (port (machine-ssh-configuration-port config))
               (identity (machine-ssh-configuration-identity config))
               (host-key (machine-ssh-configuration-host-key config)))
+          (unless host-key
+            (warning (G_ "<machine-ssh-configuration> without a 'host-key' \
+is deprecated~%")))
           (open-ssh-session host-name
                             #:user user
                             #:port port