[bug#62324] [PATCH 1/1] gnu: emu8051: Fix build error for quasiquote

[c4droid]

Here is final patch for emu8051 packages, it fix previous patches error.

>From 83dfc323e2439e6a89079054eb47d439b81d01ce Mon Sep 17 00:00:00 2001
From: c4droid <c4droid@foxmail.com>
Date: Wed, 22 Mar 2023 15:42:09 +0800
Subject: [PATCH] gnu: emu8051: Fix build error for quasiquote

---
 gnu/packages/embedded.scm | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/gnu/packages/embedded.scm b/gnu/packages/embedded.scm
index fdf950f..514c20f 100644
--- a/gnu/packages/embedded.scm
+++ b/gnu/packages/embedded.scm
@@ -1764,24 +1764,24 @@ (define-public emu8051
                 (sha256
                  (base32
                   "1xxmkcwvd5fjnhwbricafg4xvxvr8dxhfanyfp4rbksw37dgk2fx"))
-               (modules '((guix build utils)))
-               (snippet
-                #~(begin
-                    ;; Replace LDFLAGS -lcurses to -lncurses
-                    (substitute* "Makefile"
-                      (("-lcurses") "-lncurses"))))))
+                (modules '((guix build utils)))
+                (snippet #~(begin
+                             ;; Replace LDFLAGS -lcurses to -lncurses
+                             (substitute* "Makefile"
+                               (("-lcurses")
+                                "-lncurses"))))))
       (build-system gnu-build-system)
       (arguments
-       `(#:tests? #f ;No test suite
-         #:make-flags #~(list (string-append "CC="
-                                             ,(cc-for-target)))
-         #:phases #~(modify-phases %standard-phases
-                      (delete 'configure) ;No ./configure script
-                      (replace 'install
-                       ;; No installation procedure
-                       (lambda _
-                          (install-file "emu"
-                                       (string-append #$output "/bin")))))))
+       (list #:tests? #f ;No test suite
+             #:make-flags #~(list (string-append "CC="
+                                                 #$(cc-for-target)))
+             #:phases #~(modify-phases %standard-phases
+                          (delete 'configure) ;No ./configure script
+                          (replace 'install
+                            ;; No installation procedure
+                            (lambda _
+                              (install-file "emu"
+                                            (string-append #$output 
"/bin")))))))
       (inputs (list ncurses))
       (home-page "https://github.com/jarikomppa/emu8051";)
       (synopsis "8051/8052 emulator with curses-based UI")
-- 
2.39.2