services: dbus: Search more directories for '.service' files.

* gnu/services/dbus.scm (system-service-directory): Remove one level of
directories when searching for '.service' files.
This commit is contained in:
Efraim Flashner 2018-05-18 18:23:39 +03:00
parent 9b0e51461d
commit 6a2b906565
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351

View file

@ -63,7 +63,7 @@ (define files
(find-files
(string-append
service
"/share/dbus-1/system-services")
"/share/dbus-1/")
"\\.service$"))
(list #$@services)))