[bug#41247] [PATCH v2] gnu: libblockdev: Move filesystems utilities to 'propagated-inputs'

[Brice Waegeneire]

* gnu/packages/disk.scm (libblockdev)[inputs]: Move 'btrfs'progs',
'dosfstools', 'mdadm' to ...
[propagated-inputs]: ... here and add 'xfsprogs'.
---
 gnu/packages/disk.scm | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/disk.scm b/gnu/packages/disk.scm
index 6b86f6ff76..aec2519c74 100644
--- a/gnu/packages/disk.scm
+++ b/gnu/packages/disk.scm
@@ -810,15 +810,18 @@ to create devices with respective mappings for the 
ATARAID sets discovered.")
              (let ((out (assoc-ref outputs "out")))
               (substitute* "src/lib/blockdev.c"
                (("/etc/libblockdev/conf.d/" path) (string-append out 
path)))))))))
+    (propagated-inputs
+     `(("btrfs-progs" ,btrfs-progs)
+       ("dosfstools" ,dosfstools)
+       ("mdadm" ,mdadm)
+       ("xfsprogs" ,xfsprogs)))
     (native-inputs
      `(("gobject-introspection" ,gobject-introspection)
        ("pkg-config" ,pkg-config)
        ("python" ,python-wrapper)
        ("util-linux" ,util-linux)))
     (inputs
-     `(("btrfs-progs" ,btrfs-progs)
-       ("cryptsetup" ,cryptsetup)
-       ("dosfstools" ,dosfstools)
+     `(("cryptsetup" ,cryptsetup)
        ("dmraid" ,dmraid)
        ("eudev" ,eudev)
        ("glib" ,glib)
@@ -826,13 +829,10 @@ to create devices with respective mappings for the 
ATARAID sets discovered.")
        ("libbytesize" ,libbytesize)
        ("libyaml" ,libyaml)
        ("lvm2" ,lvm2)
-       ("mdadm" ,mdadm)
        ("ndctl" ,ndctl)
        ("nss" ,nss)
        ("parted" ,parted)
-       ("volume-key" ,volume-key)
-       ;; ("xfsprogs" ,xfsprogs) ; TODO: Package?
-       ))
+       ("volume-key" ,volume-key)))
     (home-page "https://github.com/storaged-project/libblockdev";)
     (synopsis "Library for manipulating block devices")
     (description
-- 
2.26.2