Archived
1
0
Fork 0

gnu: enlightenment: Use system eject.

* gnu/packages/enlightenment.scm (enlightenment)[arguments]: Adjust
'set-system-actions phase to refer to eject in /run/current-system.
[native-inputs]: Remove util-linux.
This commit is contained in:
Efraim Flashner 2020-09-01 15:35:41 +03:00
parent b27786d130
commit e8ae96ae61
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351

View file

@ -314,7 +314,6 @@ Libraries with some extra bells and whistles.")
(setenv "HOME" "/tmp") (setenv "HOME" "/tmp")
(let ((xkeyboard (assoc-ref inputs "xkeyboard-config")) (let ((xkeyboard (assoc-ref inputs "xkeyboard-config"))
(setxkbmap (assoc-ref inputs "setxkbmap")) (setxkbmap (assoc-ref inputs "setxkbmap"))
(utils (assoc-ref inputs "util-linux"))
(libc (assoc-ref inputs "libc")) (libc (assoc-ref inputs "libc"))
(bc (assoc-ref inputs "bc")) (bc (assoc-ref inputs "bc"))
(efl (assoc-ref inputs "efl"))) (efl (assoc-ref inputs "efl")))
@ -345,14 +344,13 @@ Libraries with some extra bells and whistles.")
(substitute* "data/etc/meson.build" (substitute* "data/etc/meson.build"
(("/bin/mount") "/run/setuid-programs/mount") (("/bin/mount") "/run/setuid-programs/mount")
(("/bin/umount") "/run/setuid-programs/umount") (("/bin/umount") "/run/setuid-programs/umount")
(("/usr/bin/eject") (string-append utils "/bin/eject"))) (("/usr/bin/eject") "/run/current-system/profile/bin/eject"))
(substitute* "src/bin/system/e_system_power.c" (substitute* "src/bin/system/e_system_power.c"
(("systemctl") "loginctl")) (("systemctl") "loginctl"))
#t)))))) #t))))))
(native-inputs (native-inputs
`(("gettext" ,gettext-minimal) `(("gettext" ,gettext-minimal)
("pkg-config" ,pkg-config) ("pkg-config" ,pkg-config)))
("util-linux" ,util-linux)))
(inputs (inputs
`(("alsa-lib" ,alsa-lib) `(("alsa-lib" ,alsa-lib)
("bc" ,bc) ("bc" ,bc)