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
					
				
					 1 changed files with 2 additions and 2 deletions
				
			
		|  | @ -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." | ||||
|  |  | |||
		Reference in a new issue