diff options
Diffstat (limited to 'gnu/system.scm')
| -rw-r--r-- | gnu/system.scm | 11 |
1 files changed, 2 insertions, 9 deletions
diff --git a/gnu/system.scm b/gnu/system.scm index a809451388..ea6e9c13ea 100644 --- a/gnu/system.scm +++ b/gnu/system.scm @@ -42,8 +42,6 @@ #:use-module (gnu packages man) #:use-module (gnu packages compression) #:use-module (gnu packages firmware) - #:use-module (gnu packages glib) - #:use-module (gnu packages polkit) #:autoload (gnu packages cryptsetup) (cryptsetup) #:use-module (gnu services) #:use-module (gnu services dmd) @@ -639,18 +637,13 @@ use 'plain-file' instead~%") (define %setuid-programs ;; Default set of setuid-root programs. - (let ((shadow (@ (gnu packages admin) shadow)) - ;; XXX Remove this hack when the main 'dbus' package is fixed. - (dbus (@@ (gnu packages glib) dbus-fixed))) + (let ((shadow (@ (gnu packages admin) shadow))) (list #~(string-append #$shadow "/bin/passwd") #~(string-append #$shadow "/bin/su") #~(string-append #$inetutils "/bin/ping") #~(string-append #$inetutils "/bin/ping6") #~(string-append #$sudo "/bin/sudo") - #~(string-append #$fuse "/bin/fusermount") - #~(string-append #$dbus "/libexec/dbus-daemon-launch-helper") ; XXX should be group "messagebus" and mode 4550 - #~(string-append #$polkit "/bin/pkexec") - #~(string-append #$polkit "/lib/polkit-1/polkit-agent-helper-1")))) + #~(string-append #$fuse "/bin/fusermount")))) (define %sudoers-specification ;; Default /etc/sudoers contents: 'root' and all members of the 'wheel' |