me
/
guix
Archived
1
0
Fork 0

gnu: ktsuss: Revert to default su.

* gnu/packages/admin.scm (ktsuss): Use su instead of sudo; for
compatiblity with SpaceFM.
[arguments]<#:configure-flags>: Remove "--enable-sudo=yes".
[arguments]<#:phases>[patch-file-names]: Remove sudopath from phases.

Signed-off-by: Danny Milosavljevic <dannym@scratchpost.org>
master
Raghav Gururajan 2020-05-07 11:31:02 -04:00 committed by Danny Milosavljevic
parent 4c88ae7b03
commit a632eeb86c
No known key found for this signature in database
GPG Key ID: E71A35542C30BAA5
1 changed files with 3 additions and 6 deletions

View File

@ -130,6 +130,7 @@
#:use-module (gnu packages xml)
#:use-module (gnu packages xorg))
;; This package uses su instead of sudo (because of SpaceFM).
(define-public ktsuss
(package
(name "ktsuss")
@ -146,17 +147,13 @@
(file-name (git-file-name name version))))
(build-system glib-or-gtk-build-system)
(arguments
`(#:configure-flags
(list "--enable-sudo=yes")
#:phases
`(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-file-names
(lambda _
(substitute* "configure.ac"
(("supath=`which su 2>/dev/null`")
"supath=/run/setuid-programs/su")
(("sudopath=`which sudo 2>/dev/null`")
"sudopath=/run/setuid-programs/sudo"))
"supath=/run/setuid-programs/su"))
#t)))))
(native-inputs
`(("autoconf" ,autoconf)