GNU bug report logs - #60388
[PATCH 0/2] Update lsp-plugins and use new package style.

Previous Next

Package: guix-patches;

Reported by: kiasoc5 <kiasoc5 <at> disroot.org>

Date: Wed, 28 Dec 2022 23:04:01 UTC

Severity: normal

Tags: patch

Full log


Message #11 received at 60388 <at> debbugs.gnu.org (full text, mbox):

From: kiasoc5 <kiasoc5 <at> disroot.org>
To: 60388 <at> debbugs.gnu.org
Cc: kiasoc5 <kiasoc5 <at> disroot.org>
Subject: [PATCH 2/2] gnu: lsp-plugins: Use new package style.
Date: Wed, 28 Dec 2022 18:06:10 -0500
* gnu/packages/music (lsp-plugins)[arguments]: Use G-expressions. Use #$output
instead of assoc-ref.
---
 gnu/packages/music.scm | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index 6f21a69473..b9d67d52fd 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -5778,23 +5778,23 @@ (define-public lsp-plugins
          (base32 "0anbymniyfcg9kbhd7b9spl9rk9znbhvlfv2ixbxyv3l5m9xqfhr"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:make-flags
-       (list
-         (string-append "CC=" ,(cc-for-target))
+     (list
+      #:make-flags
+      #~(list
+         (string-append "CC=" #$(cc-for-target))
          "BUILD_MODULES=\"lv2 ladspa jack\"" "VST_UI=0"
-         (string-append "PREFIX=" (assoc-ref %outputs "out"))
-         (string-append "ETC_PATH=" (assoc-ref %outputs "out") "/etc"))
-       #:phases
-       (modify-phases %standard-phases
-         (replace 'configure
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let ((out (assoc-ref outputs "out")))
-               (invoke "make" "config" "TEST=1"
-                       (string-append "PREFIX=" out)
-                       (string-append "ETCDIR=" out "/etc")))))
-         (replace 'check
-           (lambda _
-             (invoke ".build/host/lsp-plugin-fw/lsp-plugins-test" "utest"))))))
+         (string-append "PREFIX=" #$output)
+         (string-append "ETC_PATH=" #$output "/etc"))
+      #:phases
+      #~(modify-phases %standard-phases
+          (replace 'configure
+            (lambda _
+              (invoke "make" "config" "TEST=1"
+                      (string-append "PREFIX=" #$output)
+                      (string-append "ETCDIR=" #$output "/etc"))))
+          (replace 'check
+            (lambda _
+              (invoke ".build/host/lsp-plugin-fw/lsp-plugins-test" "utest"))))))
     (inputs
      (list cairo
            freetype
-- 
2.39.0





This bug report was last modified 2 years and 169 days ago.

Previous Next


GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.