From 6838ec2fa4eacb3bc0ce02d77c46cbad726b5e60 Mon Sep 17 00:00:00 2001
From: "Artyom V. Poptsov" <poptsov.artyom@gmail.com>
Date: Sat, 22 Mar 2025 14:57:13 +0300
Subject: [PATCH] gnu: ktsuss: Use GEXPs.

* gnu/packages/admin.scm (ktsuss): Use GEXPs.

Change-Id: Ic6ff0943b4fc1f71abf6df4bff8776581063943c
---
 gnu/packages/admin.scm | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index f726f0acf39..452136ff7c3 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -231,14 +231,13 @@
        (file-name (git-file-name name version))))
     (build-system glib-or-gtk-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'patch-file-names
-           (lambda _
-             (substitute* "configure.ac"
-               (("supath=`which su 2>/dev/null`")
-                "supath=/run/privileged/bin/su"))
-             #t)))))
+     (list #:phases
+           #~(modify-phases %standard-phases
+               (add-after 'unpack 'patch-file-names
+                 (lambda _
+                   (substitute* "configure.ac"
+                     (("supath=`which su 2>/dev/null`")
+                      "supath=/run/privileged/bin/su")))))))
     (native-inputs
      (list autoconf automake libtool pkg-config))
     (inputs