mapped-devices: Properly open RAID devices.
This fixes a type error introduced in 7f8ad82bf23b032ad6bd85bb1daa87cc83de509c, given that SOURCES is a list. * gnu/system/mapped-devices.scm (open-raid-device): Add 'apply' invocation.
This commit is contained in:
parent
8cecd22e4a
commit
6e52376d2e
@ -150,8 +150,8 @@ TARGET (e.g., \"/dev/md0\"), using 'mdadm'."
|
||||
(sleep 1)
|
||||
(loop (+ 1 attempts))))
|
||||
|
||||
(zero? (system* (string-append #$mdadm "/sbin/mdadm")
|
||||
"--assemble" #$target sources))))
|
||||
(zero? (apply system* (string-append #$mdadm "/sbin/mdadm")
|
||||
"--assemble" #$target sources))))
|
||||
|
||||
(define (close-raid-device sources target)
|
||||
"Return a gexp that stops the RAID device TARGET."
|
||||
|
Loading…
x
Reference in New Issue
Block a user