From e082079cb80c34f487ccc5d4fbdd7011f51f29ea Mon Sep 17 00:00:00 2001
From: Simon South <simon@simonsouth.net>
Date: Wed, 27 Sep 2023 10:55:34 -0400
Subject: [PATCH] gnu: ucsim: Use gexps.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

* gnu/packages/embedded.scm (ucsim)[arguments]: Use gexp.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 gnu/packages/embedded.scm | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/embedded.scm b/gnu/packages/embedded.scm
index 46a9a3a70a85f00256d80cc009c6e15057b9de2e..9d07bc4a55f53a3d34ff614033bd85f9dcbf73e3 100644
--- a/gnu/packages/embedded.scm
+++ b/gnu/packages/embedded.scm
@@ -1604,12 +1604,13 @@ handling communication with eBUS devices connected to a 2-wire bus system
                 "080471wvkjdzxz5j3zdaq1apjcj84ql50kn26b7p4ansixnimml4"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'patch-makefiles
-           (lambda _
-             (substitute* (find-files "." "(\\.mk$|\\.in$)")
-               (("/bin/sh") (which "sh"))))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'patch-makefiles
+            (lambda _
+              (substitute* (find-files "." "(\\.mk$|\\.in$)")
+                (("/bin/sh") (which "sh"))))))))
     (inputs
      (list ncurses))
     (native-inputs