PRELIMINARY: Add dbus-fixed.
This commit is contained in:
parent
e640340b9e
commit
86e3f95a09
|
@ -116,6 +116,24 @@ or through unencrypted TCP/IP suitable for use behind a firewall with
|
||||||
shared NFS home directories.")
|
shared NFS home directories.")
|
||||||
(license license:gpl2+))) ; or Academic Free License 2.1
|
(license license:gpl2+))) ; or Academic Free License 2.1
|
||||||
|
|
||||||
|
;; XXX This fixed version is needed only for 'dbus-daemon-launch-helper'.
|
||||||
|
;; FIXME: Integrate this change into the main 'dbus' package in the next
|
||||||
|
;; core-updates cycle.
|
||||||
|
(define dbus-fixed
|
||||||
|
(package
|
||||||
|
(inherit dbus)
|
||||||
|
(arguments
|
||||||
|
(substitute-keyword-arguments (package-arguments dbus)
|
||||||
|
((#:phases phases)
|
||||||
|
`(modify-phases ,phases
|
||||||
|
(add-after
|
||||||
|
'unpack 'add-standard-system-service-dir
|
||||||
|
(lambda _
|
||||||
|
(substitute* "dbus/dbus-sysdeps-util-unix.c"
|
||||||
|
(("standard_search_path\\[\\] =" all)
|
||||||
|
(format #f "~a ~s" all "/run/current-system/profile/share:")))
|
||||||
|
#t))))))))
|
||||||
|
|
||||||
(define glib
|
(define glib
|
||||||
(package
|
(package
|
||||||
(name "glib")
|
(name "glib")
|
||||||
|
|
Loading…
Reference in New Issue