mirror/guix
mirror/guix
1
Fork 0
mirror of https://https.git.savannah.gnu.org/git/guix.git/ synced 2025-07-10 16:50:43 +02:00
Code Releases Activity

gnu: rdfind: Update to 1.7.0.

Browse source 
* gnu/packages/admin.scm (rdfind): Update to 1.7.0.
[arguments]<#:phases>: Patch some additional tests to set
the proper "/bin/sh" intrepeter.  Don't call "which",
use "search-input-file" instead.

Change-Id: Ia0acddcf19938b0805029ee71af183a6de38111e
This commit is contained in:
Artyom V. Poptsov 2025-05-29 23:18:14 +03:00
parent 065a68b8ad
commit b750d54703
No known key found for this signature in database
GPG key ID: 935EBE0736DC857E
1 changed files with 9 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

13
gnu/packages/admin.scm
View file

@ -6694,14 +6694,14 @@ versions of @command{find}, including POSIX, GNU, and *BSD find.")
(define-public rdfind (define-public rdfind
(package (package
(name "rdfind") (name "rdfind")
(version "1.6.0") (version "1.7.0")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (string-append "https://rdfind.pauldreik.se/" name "-" version (uri (string-append "https://rdfind.pauldreik.se/" name "-" version
".tar.gz")) ".tar.gz"))
(sha256 (sha256
(base32 "0y9j1w3nbgjks0k4kgm6qq92yrwgv66n212ncmlmhsl8y676wh3s")))) (base32 "0afzwhmzlzhzzckd9iwkbx6grrzm5p4vk0zbpz8lz7hx5qan7i3q"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (list which)) (native-inputs (list which))
(inputs (list nettle)) (inputs (list nettle))
@ -6710,10 +6710,15 @@ versions of @command{find}, including POSIX, GNU, and *BSD find.")
#:phases #~(modify-phases %standard-phases #:phases #~(modify-phases %standard-phases
(add-before 'check 'patch-tests (add-before 'check 'patch-tests
(lambda _ (lambda _
(display (which "echo")) (substitute* (list "testcases/hardlink_fails.sh"
"testcases/symlinking_action.sh")
(("\"/bin/sh -c\"")
(format #f
"\"~a -c\""
(search-input-file %build-inputs "/bin/sh"))))
(substitute* "testcases/common_funcs.sh" (substitute* "testcases/common_funcs.sh"
(("/bin/echo") (("/bin/echo")
(which "echo")))))))) (search-input-file %build-inputs "/bin/echo"))))))))
(home-page "https://rdfind.pauldreik.se") (home-page "https://rdfind.pauldreik.se")
(synopsis "Find duplicate files") (synopsis "Find duplicate files")
(description (description