04/06: gnu: runc: Use G-expressions.

[guix-commits]

guix_mirror_bot pushed a commit to branch master
in repository guix.

commit e451dbf6616292176cad3686f521b8a9da5d53a7
Author: Sharlatan Hellseher <sharlata...@gmail.com>
AuthorDate: Tue Jul 22 20:56:13 2025 +0100

    gnu: runc: Use G-expressions.
    
    * gnu/packages/virtualization.scm (runc): Use G-expressions.
    
    Change-Id: I3f21b3681210004b926dfbe10abfbea0026334c3
---
 gnu/packages/virtualization.scm | 42 ++++++++++++++++++++---------------------
 1 file changed, 21 insertions(+), 21 deletions(-)

diff --git a/gnu/packages/virtualization.scm b/gnu/packages/virtualization.scm
index f494221995..c9a38bfb33 100644
--- a/gnu/packages/virtualization.scm
+++ b/gnu/packages/virtualization.scm
@@ -2356,27 +2356,27 @@ main monitor/GPU.")
                 "1nypczyb3fp3cnfdg13grxjhg9361i44zialsdkxcfxb0c9g79jf"))))
     (build-system go-build-system)
     (arguments
-     '(#:import-path "github.com/opencontainers/runc"
-       #:install-source? #f
-       ;; XXX: 20/139 tests fail due to missing /var, cgroups and apparmor in
-       ;; the build environment.
-       #:tests? #f
-       #:phases
-       (modify-phases %standard-phases
-         (replace 'build
-           (lambda* (#:key import-path #:allow-other-keys)
-             (with-directory-excursion (string-append "src/" import-path)
-               (invoke "make" "all" "man"))))
-         (replace 'check
-           (lambda* (#:key tests? #:allow-other-keys)
-             (when tests?
-               (invoke "make" "localunittest"))))
-         (replace 'install
-           (lambda* (#:key import-path outputs #:allow-other-keys)
-             (with-directory-excursion (string-append "src/" import-path)
-               (let ((out (assoc-ref outputs "out")))
-                 (invoke "make" "install" "install-bash" "install-man"
-                         (string-append "PREFIX=" out)))))))))
+     (list
+      #:import-path "github.com/opencontainers/runc"
+      #:install-source? #f
+      ;; XXX: 20/139 tests fail due to missing /var, cgroups and apparmor in
+      ;; the build environment.
+      #:tests? #f
+      #:phases
+      #~(modify-phases %standard-phases
+          (replace 'build
+            (lambda* (#:key import-path #:allow-other-keys)
+              (with-directory-excursion (string-append "src/" import-path)
+                (invoke "make" "all" "man"))))
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when tests?
+                (invoke "make" "localunittest"))))
+          (replace 'install
+            (lambda* (#:key import-path outputs #:allow-other-keys)
+              (with-directory-excursion (string-append "src/" import-path)
+                  (invoke "make" "install" "install-bash" "install-man"
+                          (string-append "PREFIX=" #$output))))))))
     (native-inputs
      (list go-md2man pkg-config))
     (inputs