diff options
| author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2019-09-10 11:02:16 +0900 |
|---|---|---|
| committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2019-10-21 11:08:32 +0900 |
| commit | 7da3e81aa1b95ba2d72118e393c4531da44d5536 (patch) | |
| tree | cd1d3db0bc57a827f22d3531ae8a5be657aaee08 | |
| parent | 47f4df157f999a361fb1d37c07a82f2089fffb4d (diff) | |
| download | guix-7da3e81aa1b95ba2d72118e393c4531da44d5536.tar.gz | |
gnu: glib: Reference dbus-launch by its absolute path.
* gnu/packages/glib.scm (glib)[phases]{patch-dbus-launch-path}: New phase.
| -rw-r--r-- | gnu/packages/glib.scm | 8 |
1 files changed, 8 insertions, 0 deletions
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. |