01/02: gnu: libsbsms: Use modify-phases.

[Mark H. Weaver]

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