summaryrefslogtreecommitdiff
path: root/gnu/packages
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2022-05-08 02:00:03 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2022-05-08 02:00:01 +0200
commit9a867c26b0138dcdb5bf79bad4b8a342498db78a (patch)
tree38ee7ed338448ebd86da6cce69e1bf41b5b85d33 /gnu/packages
parentd798e5b6c1522336438134b1034bb66323ebb3f2 (diff)
gnu: parted: Use G-expressions & new input style.
* gnu/packages/disk.scm (parted) [arguments]: Rewrite as G-expressions. [native-inputs]: Remove input labels.
Diffstat (limited to 'gnu/packages')
-rw-r--r--gnu/packages/disk.scm29
1 files changed, 14 insertions, 15 deletions
diff --git a/gnu/packages/disk.scm b/gnu/packages/disk.scm
index d05737b6c3..2a583c64c1 100644
--- a/gnu/packages/disk.scm
+++ b/gnu/packages/disk.scm
@@ -246,26 +246,25 @@ tmpfs/ramfs filesystems.")
"18h51i3x5cbqhlj5rm23m9sfw63gaaby5czln5w6qpqj3ifdsf29"))))
(build-system gnu-build-system)
(arguments
- `(#:phases
- (modify-phases %standard-phases
- (add-after 'unpack 'fix-locales-and-python
- (lambda* (#:key inputs #:allow-other-keys)
- (substitute* "tests/t0251-gpt-unicode.sh"
- (("C.UTF-8") "en_US.utf8")) ;not in Glibc locales
- (substitute* "tests/msdos-overlap"
- (("/usr/bin/python") (which "python")))
- #t)))))
+ (list #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'unpack 'fix-locales-and-python
+ (lambda _
+ (substitute* "tests/t0251-gpt-unicode.sh"
+ (("C.UTF-8") "en_US.utf8")) ;not in Glibc locales
+ (substitute* "tests/msdos-overlap"
+ (("/usr/bin/python") (which "python"))))))))
(inputs
(list lvm2 readline
`(,util-linux "lib")))
(native-inputs
- `(("gettext" ,gettext-minimal)
+ (list gettext-minimal
- ;; For the tests.
- ("e2fsprogs" ,e2fsprogs)
- ("perl" ,perl)
- ("python-wrapper" ,python-wrapper)
- ("util-linux" ,util-linux)))
+ ;; For the tests.
+ e2fsprogs
+ perl
+ python-wrapper
+ util-linux))
(home-page "https://www.gnu.org/software/parted/")
(synopsis "Disk partition editor")
(description