03/04: gnu: tidy: Use ‘modify-phases’.

[Tobias Geerinckx-Rice]

nckx pushed a commit to branch master
in repository guix.

commit 917239ff99468de351f93a019e9abe52f29adec7
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Sat Nov 12 18:33:45 2016 +0100

    gnu: tidy: Use ‘modify-phases’.
    
    * gnu/packages/web.scm (tidy)[arguments]: Use the ‘modify-phases’ syntax.
---
 gnu/packages/web.scm |   17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm
index 5237cc7..6cffc79 100644
--- a/gnu/packages/web.scm
+++ b/gnu/packages/web.scm
@@ -510,15 +510,14 @@ UTS#46.")
               (patches (search-patches "tidy-CVE-2015-5522+5523.patch"))))
     (build-system gnu-build-system)
     (arguments
-     '(#:phases (alist-cons-after
-                 'unpack 'bootstrap
-                 (lambda* (#:key inputs #:allow-other-keys)
-                   ;; configure.in and Makefile.am aren't in the root of the
-                   ;; source tree.
-                   (copy-recursively "build/gnuauto" ".")
-                   (setenv "AUTOMAKE" "automake --foreign")
-                   (zero? (system* "autoreconf" "-vfi")))
-                 %standard-phases)))
+     '(#:phases (modify-phases %standard-phases
+                  (add-after 'unpack 'bootstrap
+                    (lambda* (#:key inputs #:allow-other-keys)
+                      ;; configure.in and Makefile.am aren't in the root of the
+                      ;; source tree.
+                      (copy-recursively "build/gnuauto" ".")
+                      (setenv "AUTOMAKE" "automake --foreign")
+                      (zero? (system* "autoreconf" "-vfi")))))))
     (native-inputs
      `(("automake" ,automake)
        ("autoconf" ,autoconf)