guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

02/02: gnu: autogen: Use 'modify-phases'.


From: Efraim Flashner
Subject: 02/02: gnu: autogen: Use 'modify-phases'.
Date: Tue, 31 May 2016 19:38:27 +0000 (UTC)

efraim pushed a commit to branch master
in repository guix.

commit 99e4aa54a6cba0136335b3b525966ac2793cbb8a
Author: Efraim Flashner <address@hidden>
Date:   Tue May 31 22:24:59 2016 +0300

    gnu: autogen: Use 'modify-phases'.
    
    * gnu/packages/autogen.scm (autogen)[arguments]: Use 'modify-phases'.
---
 gnu/packages/autogen.scm |   20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/gnu/packages/autogen.scm b/gnu/packages/autogen.scm
index 704a5d1..2b90623 100644
--- a/gnu/packages/autogen.scm
+++ b/gnu/packages/autogen.scm
@@ -46,16 +46,16 @@
     (inputs `(("which" ,which)
               ("guile" ,guile-2.0)))
     (arguments
-     '(#:phases (alist-cons-before
-                 'patch-source-shebangs 'patch-test-scripts
-                 (lambda _
-                   (let ((sh (which "sh")))
-                     (substitute*
-                         (append (find-files "agen5/test" "\\.test$")
-                                 (find-files "autoopts/test" "\\.(test|in)$"))
-                       (("/bin/sh") sh)
-                       (("/usr/bin/tr") "tr"))))
-                 %standard-phases)))
+     '(#:phases
+       (modify-phases %standard-phases
+         (add-before 'patch-source-shebangs 'patch-test-scripts
+           (lambda _
+             (let ((sh (which "sh")))
+               (substitute*
+                 (append (find-files "agen5/test" "\\.test$")
+                         (find-files "autoopts/test" "\\.(test|in)$"))
+                 (("/bin/sh") sh)
+                 (("/usr/bin/tr") "tr"))))))))
     (home-page "http://www.gnu.org/software/autogen/";)
     (synopsis "Automated program generator")
     (description



reply via email to

[Prev in Thread] Current Thread [Next in Thread]