branch master updated: gnu: ktsuss: Revert to default su.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

dannym pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new a632eeb  gnu: ktsuss: Revert to default su.
a632eeb is described below

commit a632eeb86cea83957cae69e58e2120cbce598723
Author: Raghav Gururajan <address@hidden>
AuthorDate: Thu May 7 11:31:02 2020 -0400

    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 <address@hidden>
---
 gnu/packages/admin.scm | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index cb3de79..3222be2 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -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)