From 7da3e81aa1b95ba2d72118e393c4531da44d5536 Mon Sep 17 00:00:00 2001 From: Maxim Cournoyer Date: Tue, 10 Sep 2019 11:02:16 +0900 Subject: gnu: glib: Reference dbus-launch by its absolute path. * gnu/packages/glib.scm (glib)[phases]{patch-dbus-launch-path}: New phase. --- gnu/packages/glib.scm | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'gnu/packages') diff --git a/gnu/packages/glib.scm b/gnu/packages/glib.scm index c558d9fcb6..62f09436a2 100644 --- a/gnu/packages/glib.scm +++ b/gnu/packages/glib.scm @@ -201,6 +201,14 @@ shared NFS home directories.") (arguments `(#: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 (lambda* (#:key inputs outputs #:allow-other-keys) ;; For tests/gdatetime.c. -- cgit 1.4.1