me
/
guix
Archived
1
0
Fork 0

linux-initrd: Add bcachefs support.

* gnu/system/linux-initrd.scm (file-system-packages): Add
bcachefs-tools/static.
(file-system-type-modules): Add an entry for the "bcachefs" type and
module.
master
Tobias Geerinckx-Rice 2020-11-05 22:06:24 +01:00
parent 23be018d4f
commit 10defc57bf
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 5 additions and 1 deletions

View File

@ -3,7 +3,7 @@
;;; Copyright © 2016 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2016 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2017, 2019 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2017, 2019 Mathieu Othacehe <m.othacehe@gmail.com>
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -260,6 +260,9 @@ FILE-SYSTEMS."
file-systems) file-systems)
(list fatfsck/static) (list fatfsck/static)
'()) '())
,@(if (find (file-system-type-predicate "bcachefs") file-systems)
(list bcachefs-tools/static)
'())
,@(if (find (file-system-type-predicate "btrfs") file-systems) ,@(if (find (file-system-type-predicate "btrfs") file-systems)
(list btrfs-progs/static) (list btrfs-progs/static)
'()) '())
@ -295,6 +298,7 @@ FILE-SYSTEMS."
;; Given a file system type, return the list of modules it needs. ;; Given a file system type, return the list of modules it needs.
(lookup-procedure ("cifs" => '("md4" "ecb" "cifs")) (lookup-procedure ("cifs" => '("md4" "ecb" "cifs"))
("9p" => '("9p" "9pnet_virtio")) ("9p" => '("9p" "9pnet_virtio"))
("bcachefs" => '("bcachefs"))
("btrfs" => '("btrfs")) ("btrfs" => '("btrfs"))
("iso9660" => '("isofs")) ("iso9660" => '("isofs"))
("jfs" => '("jfs")) ("jfs" => '("jfs"))