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

[c4droid <c4droid@foxmail.com>]

[-- Attachment #1: Type: text/plain, Size: 74 bytes --]

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


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-gnu-emu8051-Fix-build-error-for-quasiquote.patch --]
[-- Type: text/x-patch, Size: 2394 bytes --]

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