Archived
1
0
Fork 0

gnu: libsbsms: Use modify-phases.

* gnu/packages/audio.scm (libsbsms)[arguments]: Use modify-phases.
This commit is contained in:
Mark H Weaver 2015-07-21 16:35:02 -04:00
parent 729b44e3ae
commit 09c414d80c

View file

@ -3,6 +3,7 @@
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com> ;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
;;; Copyright © 2015 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2015 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2015 Alex Kost <alezost@gmail.com> ;;; Copyright © 2015 Alex Kost <alezost@gmail.com>
;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -1375,7 +1376,8 @@ analysis plugins or audio feature extraction plugins.")
(native-inputs `(("automake" ,automake))) (native-inputs `(("automake" ,automake)))
(arguments (arguments
`(#:phases `(#:phases
(alist-cons-after (modify-phases %standard-phases
(add-after
'unpack 'fix-ar-lib-path 'unpack 'fix-ar-lib-path
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
;; Originally a symlink to '/usr/local/share/automake-1.12/ar-lib'. ;; Originally a symlink to '/usr/local/share/automake-1.12/ar-lib'.
@ -1383,8 +1385,7 @@ analysis plugins or audio feature extraction plugins.")
(symlink (symlink
(string-append (assoc-ref inputs "automake") "/share/automake-" (string-append (assoc-ref inputs "automake") "/share/automake-"
,(package-version automake) "/ar-lib") ,(package-version automake) "/ar-lib")
"ar-lib")) "ar-lib"))))))
%standard-phases)))
(home-page "http://sbsms.sourceforge.net/") (home-page "http://sbsms.sourceforge.net/")
(synopsis "Library for time stretching and pitch scaling of audio") (synopsis "Library for time stretching and pitch scaling of audio")
(description (description