mapped-devices: Properly open RAID devices.
This fixes a type error introduced in
7f8ad82bf2
, 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,7 +150,7 @@ TARGET (e.g., \"/dev/md0\"), using 'mdadm'."
|
||||||
(sleep 1)
|
(sleep 1)
|
||||||
(loop (+ 1 attempts))))
|
(loop (+ 1 attempts))))
|
||||||
|
|
||||||
(zero? (system* (string-append #$mdadm "/sbin/mdadm")
|
(zero? (apply system* (string-append #$mdadm "/sbin/mdadm")
|
||||||
"--assemble" #$target sources))))
|
"--assemble" #$target sources))))
|
||||||
|
|
||||||
(define (close-raid-device sources target)
|
(define (close-raid-device sources target)
|
||||||
|
|
Loading…
Reference in New Issue