Re: [PATCH] WIP refactor file-system-check-procedure

[David Craven <david@craven.ch>]

Hi!

It doesn't quite work yet, but wanted to know if you think that moving
checking the file systems outside the mounting procedure to be a good
idea or not.

Alternatively I could try moving all of the file-system-checking to
the build side, but I wanted to use gexps so that we can avoid this:
-  `(,@(if (find (lambda (fs)
-                    (string-prefix? "ext" (file-system-type fs)))
-                  file-systems)
-            (list e2fsck/static)
-            '())
-      ,@(if (find (lambda (fs)
-                    (string-suffix? "fat" (file-system-type fs)))
-                  file-systems)
-            (list fatfsck/static)
-            '())

David