mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-31 14:56:54 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: btrfs-progs: Use new style inputs and gexps.

Browse source 
* gnu/packages/linux.scm (btrfs-progs)[arguments]: Use new style and gexps.
  [inputs]: Use new style.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Denis 'GNUtoo' Carikli 2023-05-10 18:39:23 +02:00 committed by Ludovic Courtès
parent 255b5b81db
commit 5d84a90694
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 49 additions and 51 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

46
gnu/packages/linux.scm
View file

@ -5925,11 +5925,12 @@ (define-public btrfs-progs
(build-system gnu-build-system) (build-system gnu-build-system)
(outputs '("out" "static")) ;static versions of the binaries in "out" (outputs '("out" "static")) ;static versions of the binaries in "out"
(arguments (arguments
'(#:configure-flags (list
#:configure-flags
;; The ‘Python support’ was never actually installed by previous ;; The ‘Python support’ was never actually installed by previous
;; versions of this package, but did prevent cross-compilation. ;; versions of this package, but did prevent cross-compilation.
(list "--disable-python") #~(list "--disable-python")
#:phases (modify-phases %standard-phases #:phases #~(modify-phases %standard-phases
(add-after 'unpack 'patch-makefile (add-after 'unpack 'patch-makefile
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(substitute* "Makefile" (substitute* "Makefile"
@ -5958,27 +5959,24 @@ (define-public btrfs-progs
#:tests? #f ;XXX: require the 'btrfs' kernel module. #:tests? #f ;XXX: require the 'btrfs' kernel module.
#:test-target "test" #:test-target "test"
#:parallel-tests? #f)) ;tests fail when run in parallel #:parallel-tests? #f)) ;tests fail when run in parallel
(inputs `(("e2fsprogs" ,e2fsprogs) (inputs (list e2fsprogs ;for btrfs-convert
;for btrfs-convert eudev
("eudev" ,eudev) lzo
("lzo" ,lzo) `(,util-linux "lib") ;for libblkid and libuuid
("util-linux:lib" ,util-linux "lib") ;for libblkid and libuuid `(,util-linux "static") ;ditto
("util-linux:static" ,util-linux "static") ;ditto zlib
("zlib" ,zlib) `(,zlib "static")
("zlib:static" ,zlib "static") `(,zstd "lib")
("zstd" ,zstd "lib") `(,zstd "static")))
("zstd:static" ,zstd "static"))) (native-inputs (list pkg-config
(native-inputs `(("pkg-config" ,pkg-config) python-sphinx ;for building documentation
;; For building documentation. acl ;for tests
("python-sphinx" ,python-sphinx) lvm2 ;for dmsetup
;; For tests. grep ;need Perl regexp support
("acl" ,acl) libaio
("dmsetup" ,lvm2) liburing
("grep" ,grep) ;need Perl regexp support util-linux ;for fallocate
("libaio" ,libaio) which))
("liburing" ,liburing)
("util-linux" ,util-linux) ;for fallocate
("which" ,which)))
(home-page "https://btrfs.wiki.kernel.org/index.php/Main_Page") (home-page "https://btrfs.wiki.kernel.org/index.php/Main_Page")
(synopsis "Create and manage btrfs copy-on-write file systems") (synopsis "Create and manage btrfs copy-on-write file systems")
(description (description