ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 13:58:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

machine: ssh: Use 'formatted-message'.

Browse source 
* gnu/machine/ssh.scm (machine-check-initrd-modules): Use
'formatted-message' instead of 'format' + '&message'.
This commit is contained in:
Ludovic Courtès 2021-02-25 10:01:56 +01:00
parent 73303067c7
commit 120051e1b9
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gnu/machine/ssh.scm
View file

@ -270,11 +270,9 @@ (define dev
(remote-let ((missing remote-exp)) (remote-let ((missing remote-exp))
(unless (null? missing) (unless (null? missing)
(raise (condition (raise (formatted-message (G_ "missing modules for ~a:~{ ~a~}~%")
(&message
(message (format #f (G_ "missing modules for ~a:~{ ~a~}~%")
(file-system-device fs) (file-system-device fs)
missing)))))))) missing)))))
(map missing-modules file-systems)) (map missing-modules file-systems))