linux-boot: Ask fsck for a progress bar.

* gnu/build/file-systems.scm (check-file-system): Pass '-C 0' to FSCK.
  Suggested by Mark H. Weaver.

diff --git a/gnu/build/file-systems.scm b/gnu/build/file-systems.scm
index 5c04771..4ac7a7f 100644 (file)
--- a/gnu/build/file-systems.scm
+++ b/gnu/build/file-systems.scm
@@ -233,7 +233,7 @@ the following:
   (define fsck
     (string-append "fsck." type))
 
-  (let ((status (system* fsck "-v" "-p" device)))
+  (let ((status (system* fsck "-v" "-p" "-C" "0" device)))
     (match (status:exit-val status)
       (0
        #t)