futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: bristol: Remove trailing #T.

Browse Source 
* gnu/packages/music.scm (bristol)[arguments]: Drop trailing #T from build
phases.
This commit is contained in:
Ricardo Wurmus 2023-02-07 19:40:42 +01:00
parent 532dace22d
commit e03c7c32ed
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
gnu/packages/music.scm
View File

@ -2612,22 +2612,19 @@ Laurens Hammond and Don Leslie.")
(when (not (or (string-prefix? "x86_64" system) (when (not (or (string-prefix? "x86_64" system)
(string-prefix? "i686" system))) (string-prefix? "i686" system)))
(substitute* "bristol/Makefile.in" (substitute* "bristol/Makefile.in"
(("-msse -mfpmath=sse") ""))) (("-msse -mfpmath=sse") "")))))
#t))
;; alsa-lib 1.1.x no longer provides iatomic.h. That's okay because ;; alsa-lib 1.1.x no longer provides iatomic.h. That's okay because
;; bristol actually doesn't use it. ;; bristol actually doesn't use it.
(add-after 'unpack 'do-not-use-alsa-iatomic (add-after 'unpack 'do-not-use-alsa-iatomic
(lambda _ (lambda _
(substitute* "libbristolaudio/audioEngineJack.c" (substitute* "libbristolaudio/audioEngineJack.c"
(("#include <alsa/iatomic.h>") "")) (("#include <alsa/iatomic.h>") ""))))
#t))
;; We know that Bristol has been linked with JACK and we don't have ;; We know that Bristol has been linked with JACK and we don't have
;; ldd, so we can just skip this check. ;; ldd, so we can just skip this check.
(add-after 'unpack 'do-not-grep-for-jack (add-after 'unpack 'do-not-grep-for-jack
(lambda _ (lambda _
(substitute* "bin/startBristol.in" (substitute* "bin/startBristol.in"
(("ldd `which bristol` | grep jack") "echo guix")) (("ldd `which bristol` | grep jack") "echo guix")))))))
#t)))))
(inputs (inputs
(list alsa-lib jack-1 liblo libx11)) (list alsa-lib jack-1 liblo libx11))
(native-inputs (native-inputs