02/02: gnu: guile-ncurses: Use 'modify-phases'.

[Efraim Flashner]

efraim pushed a commit to branch master
in repository guix.

commit fa37f21bda179b560da0a2377f876a473c9718a4
Author: Efraim Flashner <address@hidden>
Date:   Tue May 10 07:41:27 2016 +0300

    gnu: guile-ncurses: Use 'modify-phases'.
    
    * gnu/packages/guile.scm (guile-ncurses)[arguments]: Use 'modify-phases'.
---
 gnu/packages/guile.scm |   22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index 954700f..cf79d4e 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -379,17 +379,17 @@ many readers as needed).")
                                (string-append "--with-guilesitedir="
                                               (assoc-ref %outputs "out")
                                               "/share/guile/site/2.0"))
-       #:phases (alist-cons-after
-                 'install 'post-install
-                 (lambda* (#:key outputs #:allow-other-keys)
-                   (let* ((out   (assoc-ref outputs "out"))
-                          (dir   (string-append out "/share/guile/site/"))
-                          (files (find-files dir ".scm")))
-                     (substitute* files
-                       (("\"libguile-ncurses\"")
-                        (format #f "\"~a/lib/libguile-ncurses\""
-                                out)))))
-                 %standard-phases)))
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'install 'post-install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let* ((out   (assoc-ref outputs "out"))
+                    (dir   (string-append out "/share/guile/site/"))
+                    (files (find-files dir ".scm")))
+               (substitute* files
+                 (("\"libguile-ncurses\"")
+                  (format #f "\"~a/lib/libguile-ncurses\""
+                          out)))))))))
     (home-page "http://www.gnu.org/software/guile-ncurses/";)
     (synopsis "Guile bindings to ncurses")
     (description