me/guix
Archived
1
0
Fork 0
Code Activity

gnu: lsp-plugins: Use new package style.

Browse source 
* gnu/packages/music (lsp-plugins)[arguments]: Use G-expressions. Use #$output
instead of assoc-ref.

Change-Id: Idca583b06e54c15f98a8439e7fb2a553bf9b112c
Signed-off-by: Christopher Baines <mail@cbaines.net>
This commit is contained in:
Parnikkapore 2024-04-20 23:58:31 +02:00 • committed by Christopher Baines
parent 8dae4e1ba7
commit eab1301bc2
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
1 changed files with 17 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
gnu/packages/music.scm
View file

@ -6221,24 +6221,24 @@ and reverb.")
(base32 "1bpkbmy8djz304rlsf9zp7bkyc874gnpfihkigqg4fj667x2xfcj")))) (base32 "1bpkbmy8djz304rlsf9zp7bkyc874gnpfihkigqg4fj667x2xfcj"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:make-flags
(list (list
(string-append "CC=" ,(cc-for-target)) #:make-flags
#~(list
(string-append "CC=" #$(cc-for-target))
"BUILD_MODULES=\"lv2 ladspa jack\"" "VST_UI=0" "BUILD_MODULES=\"lv2 ladspa jack\"" "VST_UI=0"
(string-append "PREFIX=" (assoc-ref %outputs "out")) (string-append "PREFIX=" #$output)
(string-append "ETC_PATH=" (assoc-ref %outputs "out") "/etc")) (string-append "ETC_PATH=" #$output "/etc"))
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(replace 'configure (replace 'configure
(lambda* (#:key outputs #:allow-other-keys) (lambda _
(let ((out (assoc-ref outputs "out")))
(invoke "make" "config" "TEST=1" (invoke "make" "config" "TEST=1"
(string-append "PREFIX=" out) (string-append "PREFIX=" #$output)
(string-append "ETCDIR=" out "/etc"))))) (string-append "ETCDIR=" #$output "/etc"))))
(replace 'check (replace 'check
(lambda* (#:key tests? #:allow-other-keys) (lambda* (#:key tests? #:allow-other-keys)
(when tests? (when tests?
(invoke ".build/host/lsp-plugin-fw/lsp-plugins-test" "utest")))))) (invoke ".build/host/lsp-plugin-fw/lsp-plugins-test" "utest")))))))
(inputs (inputs
(list cairo (list cairo
freetype freetype