gnu: wdiff: Use gexps.

* gnu/packages/patchutils.scm(wdiff)[arguments]: Use gexps.

Change-Id: Ife2c051c209948afafe67854a315bdfa1a604f52
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Merges: #4774
This commit is contained in:
Anderson Torres 2025-12-09 22:23:09 -03:00 committed by Ludovic Courtès
parent 805dd1764e
commit ea1c939464
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -534,20 +534,22 @@ Users can login allowing them to change the state of patches.")
(version "1.2.2") (version "1.2.2")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnu/wdiff/wdiff-" (uri (string-append "mirror://gnu/wdiff/wdiff-"
version ".tar.gz")) version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"0sxgg0ms5lhi4aqqvz1rj4s77yi9wymfm3l3gbjfd1qchy66kzrl")))) "0sxgg0ms5lhi4aqqvz1rj4s77yi9wymfm3l3gbjfd1qchy66kzrl"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:phases (modify-phases %standard-phases (list
(add-before 'check 'fix-sh #:phases
(lambda _ #~(modify-phases %standard-phases
(substitute* "tests/testsuite" (add-before 'check 'fix-testsuite
(("#! /bin/sh") (lambda _
(string-append "#!" (which "sh"))))))))) (substitute* "tests/testsuite"
(("#! /bin/sh")
(string-append "#!" (which "sh")))))))))
(native-inputs (native-inputs
(list which (list which
;; For some reason wdiff.info gets rebuilt. ;; For some reason wdiff.info gets rebuilt.