diff --git a/gnu/services/dbus.scm b/gnu/services/dbus.scm index 7b3c8100e2..7f506a16c5 100644 --- a/gnu/services/dbus.scm +++ b/gnu/services/dbus.scm @@ -25,6 +25,7 @@ #:use-module ((gnu packages glib) #:select (dbus)) #:use-module (gnu packages polkit) #:use-module (gnu packages admin) + #:use-module (gnu packages linux) #:use-module (guix gexp) #:use-module ((guix packages) #:select (package-name)) #:use-module (guix records) @@ -186,9 +187,12 @@ includes the @code{etc/dbus-1/system.d} directories of each package listed in (list (shepherd-service (documentation "Run the D-Bus system daemon.") (provision '(dbus-system)) - (requirement '(user-processes syslogd)) + (requirement '(user-processes syslogd)) ;<- add 'host-name' and/or 'nscd' (start #~(make-forkexec-constructor - (list (string-append #$dbus "/bin/dbus-daemon") + (list #$(file-append strace "/bin/strace") + "-o" "/dbus.trace" + "-s" "500" "-ff" + (string-append #$dbus "/bin/dbus-daemon") "--nofork" "--system" "--syslog-only") #:pid-file "/var/run/dbus/pid")) (stop #~(make-kill-destructor)))))))