gnu: nginx: Use modify-phases syntax.

* gnu/packages/web.scm (nginx): Use modify-phases syntax.
This commit is contained in:
David Thompson 2015-04-05 12:31:54 -04:00
parent e16fde1447
commit a71c315bc2

View file

@ -108,13 +108,12 @@ (define-public nginx
(arguments
`(#:tests? #f ; no test target
#:phases
(alist-cons-before
'configure 'patch-/bin/sh
(modify-phases %standard-phases
(add-before configure patch-/bin/sh
(lambda _
(substitute* "auto/feature"
(("/bin/sh") (which "bash"))))
(alist-replace
'configure
(("/bin/sh") (which "bash")))))
(replace configure
(lambda* (#:key outputs #:allow-other-keys)
(let ((flags
(list (string-append "--prefix=" (assoc-ref outputs "out"))
@ -138,8 +137,7 @@ (define-public nginx
(setenv "CC" "gcc")
(format #t "environment variable `CC' set to `gcc'~%")
(format #t "configure flags: ~s~%" flags)
(zero? (apply system* "./configure" flags))))
%standard-phases))))
(zero? (apply system* "./configure" flags))))))))
(home-page "http://nginx.org")
(synopsis "HTTP and reverse proxy server")
(description