guix_mirror_bot pushed a commit to branch master
in repository guix.
commit b750d54703d849fe58dcacf94f23d34ab85b23a2
Author: Artyom V. Poptsov <poptsov.art...@gmail.com>
AuthorDate: Thu May 29 23:18:14 2025 +0300
gnu: rdfind: Update to 1.7.0.
* 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
---
gnu/packages/admin.scm | 13 +++++++++----
1 file changed, 9 insertions(+), 4 deletions(-)
diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 9dc149cef3..82dd9227ee 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -6694,14 +6694,14 @@ versions of @command{find}, including POSIX, GNU, and
*BSD find.")
(define-public rdfind
(package
(name "rdfind")
- (version "1.6.0")
+ (version "1.7.0")
(source
(origin
(method url-fetch)
(uri (string-append "https://rdfind.pauldreik.se/"; name "-" version
".tar.gz"))
(sha256
- (base32 "0y9j1w3nbgjks0k4kgm6qq92yrwgv66n212ncmlmhsl8y676wh3s"))))
+ (base32 "0afzwhmzlzhzzckd9iwkbx6grrzm5p4vk0zbpz8lz7hx5qan7i3q"))))
(build-system gnu-build-system)
(native-inputs (list which))
(inputs (list nettle))
@@ -6710,10 +6710,15 @@ versions of @command{find}, including POSIX, GNU, and
*BSD find.")
#:phases #~(modify-phases %standard-phases
(add-before 'check 'patch-tests
(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"
(("/bin/echo")
- (which "echo"))))))))
+ (search-input-file %build-inputs "/bin/echo"))))))))
(home-page "https://rdfind.pauldreik.se";)
(synopsis "Find duplicate files")
(description
