01/07: machine: ssh: Use 'formatted-message'.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 120051e1b9358f75b228e97670843095d5fcdf49
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Thu Feb 25 10:01:56 2021 +0100

    machine: ssh: Use 'formatted-message'.
    
    * gnu/machine/ssh.scm (machine-check-initrd-modules): Use
    'formatted-message' instead of 'format' + '&message'.
---
 gnu/machine/ssh.scm | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/gnu/machine/ssh.scm b/gnu/machine/ssh.scm
index 997d673..fa94216 100644
--- a/gnu/machine/ssh.scm
+++ b/gnu/machine/ssh.scm
@@ -270,11 +270,9 @@ not available in the initrd."
 
     (remote-let ((missing remote-exp))
       (unless (null? missing)
-        (raise (condition
-                (&message
-                 (message (format #f (G_ "missing modules for ~a:~{ ~a~}~%")
+        (raise (formatted-message (G_ "missing modules for ~a:~{ ~a~}~%")
                                   (file-system-device fs)
-                                  missing))))))))
+                                  missing)))))
 
   (map missing-modules file-systems))