~ruther/guix-local: mapped-devices: Properly open RAID devices.

6e52376d2e6c9ef849bd46b2ee72b58ad30d1947 — Ludovic Courtès 9 years ago 8cecd22

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.

patch browse .tar.gz

1 files changed, 2 insertions(+), 2 deletions(-)

M gnu/system/mapped-devices.scm

M gnu/system/mapped-devices.scm => gnu/system/mapped-devices.scm +2 -2

@@ 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."