HCoop
/
jackhill
/
guix
/
guix.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
8cecd22
)
mapped-devices: Properly open RAID devices.
author
Ludovic Courtès
<ludo@gnu.org>
Tue, 4 Oct 2016 17:48:51 +0000
(19:48 +0200)
committer
Ludovic Courtès
<ludo@gnu.org>
Tue, 4 Oct 2016 17:51:53 +0000
(19:51 +0200)
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
patch
|
blob
|
blame
|
history
diff --git
a/gnu/system/mapped-devices.scm
b/gnu/system/mapped-devices.scm
index
2ce35ea
..
2487638
100644
(file)
--- 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."