[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/02: gnu: libsbsms: Use modify-phases.
From: |
Mark H. Weaver |
Subject: |
01/02: gnu: libsbsms: Use modify-phases. |
Date: |
Tue, 21 Jul 2015 22:25:52 +0000 |
mhw pushed a commit to branch master
in repository guix.
commit 09c414d80c00e9f04b871e334eb0ca3190d46bf0
Author: Mark H Weaver <address@hidden>
Date: Tue Jul 21 16:35:02 2015 -0400
gnu: libsbsms: Use modify-phases.
* gnu/packages/audio.scm (libsbsms)[arguments]: Use modify-phases.
---
gnu/packages/audio.scm | 21 +++++++++++----------
1 files changed, 11 insertions(+), 10 deletions(-)
diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm
index 8b12b18..e803979 100644
--- a/gnu/packages/audio.scm
+++ b/gnu/packages/audio.scm
@@ -3,6 +3,7 @@
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <address@hidden>
;;; Copyright © 2015 Andreas Enge <address@hidden>
;;; Copyright © 2015 Alex Kost <address@hidden>
+;;; Copyright © 2015 Mark H Weaver <address@hidden>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -1375,16 +1376,16 @@ analysis plugins or audio feature extraction plugins.")
(native-inputs `(("automake" ,automake)))
(arguments
`(#:phases
- (alist-cons-after
- 'unpack 'fix-ar-lib-path
- (lambda* (#:key inputs #:allow-other-keys)
- ;; Originally a symlink to '/usr/local/share/automake-1.12/ar-lib'.
- (delete-file "ar-lib")
- (symlink
- (string-append (assoc-ref inputs "automake") "/share/automake-"
- ,(package-version automake) "/ar-lib")
- "ar-lib"))
- %standard-phases)))
+ (modify-phases %standard-phases
+ (add-after
+ 'unpack 'fix-ar-lib-path
+ (lambda* (#:key inputs #:allow-other-keys)
+ ;; Originally a symlink to '/usr/local/share/automake-1.12/ar-lib'.
+ (delete-file "ar-lib")
+ (symlink
+ (string-append (assoc-ref inputs "automake") "/share/automake-"
+ ,(package-version automake) "/ar-lib")
+ "ar-lib"))))))
(home-page "http://sbsms.sourceforge.net/")
(synopsis "Library for time stretching and pitch scaling of audio")
(description