From 575b4b092d73403381277625794042a7b7253cfe Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sun, 28 Jun 2015 00:39:43 -0400 Subject: gnu: system: Move file-system->spec to (gnu system file-systems). * gnu/system/linux-initrd.scm (file-system->spec): Move this... * gnu/system/file-systems.scm: ... to here. --- gnu/system/linux-initrd.scm | 7 ------- 1 file changed, 7 deletions(-) (limited to 'gnu/system/linux-initrd.scm') diff --git a/gnu/system/linux-initrd.scm b/gnu/system/linux-initrd.scm index 74dacf1ecd..2b7ae71612 100644 --- a/gnu/system/linux-initrd.scm +++ b/gnu/system/linux-initrd.scm @@ -132,13 +132,6 @@ MODULES and taken from LINUX." (guix elf) (gnu build linux-modules)))) -(define (file-system->spec fs) - "Return a list corresponding to file-system FS that can be passed to the -initrd code." - (match fs - (($ device title mount-point type flags options _ check?) - (list device title mount-point type flags options check?)))) - (define* (base-initrd file-systems #:key (linux linux-libre) -- cgit v1.2.3