From 9fa8c53625756f9a32c5832d92fd54d7c34b8b70 Mon Sep 17 00:00:00 2001
From: Zheng Junjie <zhengjunjie@iscas.ac.cn>
Date: Sat, 23 Mar 2024 00:45:06 +0800
Subject: gnu: slock: Fix cross-compiling.

* gnu/packages/suckless.scm (slock)[arguments]: Use Gexp.

Change-Id: I491c43a6ce2c3fc3aed43ecab9d4a2ab251038bb
Signed-off-by: Christopher Baines <mail@cbaines.net>
---
 gnu/packages/suckless.scm | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/suckless.scm b/gnu/packages/suckless.scm
index 81e2151854..257d01b3f1 100644
--- a/gnu/packages/suckless.scm
+++ b/gnu/packages/suckless.scm
@@ -15,6 +15,7 @@
 ;;; Copyright © 2022 jgart <jgart@dismail.de>
 ;;; Copyright © 2022 Antero Mejr <antero@mailbox.org>
 ;;; Copyright © 2024 Clément Lassieur <clement@lassieur.org>
+;;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -349,11 +350,11 @@ numbers of user-defined menu items efficiently.")
                 "0k8fvf9g27yyaqpyhk6apbkq6r4vjwxhff1qb9ignxx2yvxy7qdf"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:tests? #f                      ; no tests
-       #:make-flags
-       (list (string-append "CC=" ,(cc-for-target))
-             (string-append "PREFIX=" %output))
-       #:phases (modify-phases %standard-phases (delete 'configure))))
+     (list #:tests? #f                      ; no tests
+           #:make-flags #~(list (string-append "CC=" #$(cc-for-target))
+                                (string-append "PREFIX=" #$output))
+           #:phases #~(modify-phases %standard-phases
+                        (delete 'configure))))
     (inputs
      (list libx11 libxext libxinerama libxrandr))
     (home-page "https://tools.suckless.org/slock/")
-- 
cgit v1.2.3