gnu: glib: Reference dbus-launch by its absolute path.
* gnu/packages/glib.scm (glib)[phases]{patch-dbus-launch-path}: New phase.
This commit is contained in:
parent
47f4df157f
commit
7da3e81aa1
@ -201,6 +201,14 @@ shared NFS home directories.")
|
|||||||
(arguments
|
(arguments
|
||||||
`(#:phases
|
`(#:phases
|
||||||
(modify-phases %standard-phases
|
(modify-phases %standard-phases
|
||||||
|
(add-after 'unpack 'patch-dbus-launch-path
|
||||||
|
(lambda* (#:key inputs #:allow-other-keys)
|
||||||
|
(let ((dbus (assoc-ref inputs "dbus")))
|
||||||
|
(substitute* "gio/gdbusaddress.c"
|
||||||
|
(("command_line = g_strdup_printf \\(\"dbus-launch")
|
||||||
|
(string-append "command_line = g_strdup_printf (\""
|
||||||
|
dbus "/bin/dbus-launch")))
|
||||||
|
#t)))
|
||||||
(add-before 'build 'pre-build
|
(add-before 'build 'pre-build
|
||||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||||
;; For tests/gdatetime.c.
|
;; For tests/gdatetime.c.
|
||||||
|
Loading…
x
Reference in New Issue
Block a user