There is no reason to wrap libexec and it breaks stuff (e.g. #81571).
Simplest fix is to just stop wrapping it.
* guix/scripts/pack.scm (wrapped-package): Symlink-relative libexec. Do not
wrap /libexec/.
---
Proposed fix.
guix/scripts/pack.scm | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/guix/scripts/pack.scm b/guix/scripts/pack.scm
index 1536e913bf6..31a22776b9f 100644
--- a/guix/scripts/pack.scm
+++ b/guix/scripts/pack.scm
@@ -1354,7 +1354,7 @@ (define* (wrapped-package package
;; properly defined in PROFILE/etc/profile.
(mkdir target)
(for-each (lambda (file)
- (unless (member file '("." ".." "bin" "sbin" "libexec"))
+ (unless (member file '("." ".." "bin" "sbin"))
(symlink-relative (string-append input "/" file)
(string-append target "/" file))))
(scandir input))
@@ -1363,8 +1363,7 @@ (define* (wrapped-package package
(partition executable-file?
;; Note: Trailing slash in case these are symlinks.
(append (find-files (string-append input "/bin/"))
- (find-files (string-append input "/sbin/"))
- (find-files (string-append input
"/libexec/"))))
+ (find-files (string-append input "/sbin/"))))
;; Wrap only executables, since the wrapper will eventually need
;; to execve them. E.g. git's "libexec" directory contains many
;; shell scripts that are source'd from elsewhere, which fails if
--
2.54.0
