me
/
guix
Archived
1
0
Fork 0
Code

gnu: tracker: Don't wrap binaries in libexec/tracker3 directory. 

These binaries are mere symlinks to the already wrapped tracker command.
They are used in a command lookup via argv[0], which wrapping them breaks.

* gnu/packages/gnome.scm (tracker)[#:phases]: Add ‘unwrap-libexec’.
Liliana Marie Prikler 2023-02-25 07:46:37 +01:00
parent 7fc415aba9
commit ea75ca1806
No known key found for this signature in database
GPG Key ID: 442A84B8C70E2F87
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
gnu/packages/gnome.scm
View File

@ -9710,7 +9710,18 @@ easy, safe, and automatic.")
;; Some tests expect to write to $HOME. ;; Some tests expect to write to $HOME.
(setenv "HOME" "/tmp") (setenv "HOME" "/tmp")
(apply invoke "dbus-run-session" "--" "meson" "test" (apply invoke "dbus-run-session" "--" "meson" "test"
"--print-errorlogs" test-options))))))) "--print-errorlogs" test-options))))
(add-after 'glib-or-gtk-wrap 'unwrap-libexec
(lambda* (#:key outputs #:allow-other-keys)
(with-directory-excursion (string-append (assoc-ref outputs "out")
"/libexec/tracker3")
(for-each
(lambda (f)
(let ((real (string-append "." (basename f) "-real")))
(when (file-exists? real)
(delete-file f)
(rename-file real f))))
(find-files "."))))))))
(native-inputs (native-inputs
(list gettext-minimal (list gettext-minimal
`(,glib "bin") `(,glib "bin")