mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-12 06:06:53 -05:00
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’.
This commit is contained in:
parent
7fc415aba9
commit
ea75ca1806
1 changed files with 12 additions and 1 deletions
|
@ -9710,7 +9710,18 @@ (define-public tracker
|
|||
;; Some tests expect to write to $HOME.
|
||||
(setenv "HOME" "/tmp")
|
||||
(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
|
||||
(list gettext-minimal
|
||||
`(,glib "bin")
|
||||
|
|
Loading…
Reference in a new issue