ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-26 14:28:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: tao: Remove trailing #T.

Browse source 
* gnu/packages/audio.scm (tao)[arguments]: Remove trailing #T from build
phases...
[source]: ...and from the snippet.
This commit is contained in:
Ricardo Wurmus 2022-01-01 00:06:29 +01:00
parent a73021038d
commit d348439bb8
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 4 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
gnu/packages/audio.scm
View file

@ -1250,10 +1250,8 @@ (define-public tao
"tao-fix-parser-types.patch")) "tao-fix-parser-types.patch"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
'(begin '(substitute* "configure"
(substitute* "configure" (("SHELL=/bin/sh") "")))))
(("SHELL=/bin/sh") ""))
#t))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:configure-flags '("TAO_RELEASE=-beta") '(#:configure-flags '("TAO_RELEASE=-beta")
@ -1269,8 +1267,7 @@ (define-public tao
(string-append (which "sed") " -f $distdir/")) (string-append (which "sed") " -f $distdir/"))
(("distdir=.*") (("distdir=.*")
(string-append "distdir=" (string-append "distdir="
(assoc-ref outputs "out") "/share/tao"))) (assoc-ref outputs "out") "/share/tao")))))
#t))
(add-after 'install 'install-extra-files (add-after 'install 'install-extra-files
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
@ -1281,8 +1278,7 @@ (define-public tao
(install-file "user-scripts/error.parse" share) (install-file "user-scripts/error.parse" share)
(copy-recursively "examples" (string-append share "examples")) (copy-recursively "examples" (string-append share "examples"))
(for-each (lambda (file) (install-file file inc)) (for-each (lambda (file) (install-file file inc))
(find-files "include" "\\.h")) (find-files "include" "\\.h"))))))))
#t))))))
(inputs (inputs
(list audiofile (list audiofile
libxi libxi