diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2021-09-23 13:14:52 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2021-09-23 18:17:17 +0200 |
| commit | cd19c920b7bf15af6b8ea06aa5021487d65773a6 (patch) | |
| tree | e6c08d4ef6e845b498feb6f34edfcba673f87842 /gnu/system/linux-initrd.scm | |
| parent | 90604348e14913da48327da05113d7da8ae7655a (diff) | |
linux-initrd: Support XFS.
* gnu/system/linux-initrd.scm (file-system-packages):
Add xfs_repair/static when needed.
(file-system-type-modules): Add ‘xfs’ module when needed.
Diffstat (limited to 'gnu/system/linux-initrd.scm')
| -rw-r--r-- | gnu/system/linux-initrd.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gnu/system/linux-initrd.scm b/gnu/system/linux-initrd.scm index dc0f419bfd0..a083292fcf4 100644 --- a/gnu/system/linux-initrd.scm +++ b/gnu/system/linux-initrd.scm | |||
| @@ -290,6 +290,9 @@ FILE-SYSTEMS." | |||
| 290 | '()) | 290 | '()) |
| 291 | ,@(if (find (file-system-type-predicate "f2fs") file-systems) | 291 | ,@(if (find (file-system-type-predicate "f2fs") file-systems) |
| 292 | (list f2fs-fsck/static) | 292 | (list f2fs-fsck/static) |
| 293 | '()) | ||
| 294 | ,@(if (find (file-system-type-predicate "xfs") file-systems) | ||
| 295 | (list xfs_repair/static) | ||
| 293 | '()))) | 296 | '()))) |
| 294 | 297 | ||
| 295 | (define-syntax vhash ;TODO: factorize | 298 | (define-syntax vhash ;TODO: factorize |
| @@ -322,6 +325,7 @@ FILE-SYSTEMS." | |||
| 322 | ("iso9660" => '("isofs")) | 325 | ("iso9660" => '("isofs")) |
| 323 | ("jfs" => '("jfs")) | 326 | ("jfs" => '("jfs")) |
| 324 | ("f2fs" => '("f2fs" "crc32_generic")) | 327 | ("f2fs" => '("f2fs" "crc32_generic")) |
| 328 | ("xfs" => '("xfs")) | ||
| 325 | (else '()))) | 329 | (else '()))) |
| 326 | 330 | ||
| 327 | (define (file-system-modules file-systems) | 331 | (define (file-system-modules file-systems) |