02/05: gnu: mujs: Use G-expressions.

[guix-commits]

efraim pushed a commit to branch master
in repository guix.

commit 05d4f2435b32b1d91c4b4589ba7c6571e180e2b6
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Mon May 9 23:13:27 2022 +0300

    gnu: mujs: Use G-expressions.
    
    * gnu/packages/javascript.scm (mujs)[arguments]: Rewrite using
    G-expressions.
---
 gnu/packages/javascript.scm | 19 ++++++++++---------
 1 file changed, 10 insertions(+), 9 deletions(-)

diff --git a/gnu/packages/javascript.scm b/gnu/packages/javascript.scm
index 70c1b11dd1..8ab8c46cd3 100644
--- a/gnu/packages/javascript.scm
+++ b/gnu/packages/javascript.scm
@@ -701,16 +701,17 @@ external server.")
                             "one.c"))))))
     (build-system gnu-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (delete 'configure)  ; no configure script
-         (replace 'install
-           (lambda* (#:key (make-flags '()) #:allow-other-keys)
-             (apply invoke "make" "install-shared" make-flags))))
+     (list
+       #:phases
+       #~(modify-phases %standard-phases
+           (delete 'configure)          ; no configure script
+           (replace 'install
+             (lambda* (#:key (make-flags '()) #:allow-other-keys)
+               (apply invoke "make" "install-shared" make-flags))))
        #:make-flags
-       (list ,(string-append "VERSION=" version)
-             ,(string-append "CC=" (cc-for-target))
-             (string-append "prefix=" (assoc-ref %outputs "out")))
+       #~(list (string-append "VERSION=" #$version)
+               (string-append "CC=" #$(cc-for-target))
+               (string-append "prefix=" #$output))
        #:tests? #f))                    ; no tests
     (inputs
      (list readline))