[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: mapped-devices: Properly open RAID devices.
From: |
Ludovic Courtès |
Subject: |
01/01: mapped-devices: Properly open RAID devices. |
Date: |
Tue, 4 Oct 2016 17:52:32 +0000 (UTC) |
civodul pushed a commit to branch master
in repository guix.
commit 6e52376d2e6c9ef849bd46b2ee72b58ad30d1947
Author: Ludovic Courtès <address@hidden>
Date: Tue Oct 4 19:48:51 2016 +0200
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.
---
gnu/system/mapped-devices.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/gnu/system/mapped-devices.scm b/gnu/system/mapped-devices.scm
index 2ce35ea..2487638 100644
--- a/gnu/system/mapped-devices.scm
+++ b/gnu/system/mapped-devices.scm
@@ -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."