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
parent
4c88ae7b03
commit
a632eeb86c
|
@ -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)
|
||||
|
|
Reference in New Issue