ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-27 04:59:27 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: nginx: Respect #:configure-flags.

Browse source 
* gnu/packages/web.scm (nginx)[arguments]: Add #:configure-flags.  Move
default settings out of the 'configure' phase.
This commit is contained in:
Marius Bakke 2022-04-07 22:55:16 +02:00
parent 4079cd9ba3
commit c9ce02ecff
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 39 additions and 39 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

34
gnu/packages/web.scm
View file

@ -386,18 +386,8 @@ (define-public nginx
(arguments
(list
#:tests? #f ; no test target
#:phases
#~(modify-phases %standard-phases
(add-before 'configure 'patch-/bin/sh
(lambda _
(substitute* "auto/feature"
(("/bin/sh") (which "sh")))))
(replace 'configure
;; The configure script is hand-written, not from GNU autotools.
(lambda* (#:key configure-flags inputs outputs #:allow-other-keys)
(let ((flags
(append (list (string-append "--prefix=" (assoc-ref outputs "out"))
"--with-http_ssl_module"
#:configure-flags
#~(list "--with-http_ssl_module"
"--with-http_v2_module"
"--with-http_xslt_module"
"--with-http_gzip_static_module"
@ -425,14 +415,24 @@ (define-public nginx
(_ "UNSUPPORTED"))))
(string-append "--crossbuild="
system ":" release ":" machine)))
configure-flags)))
#:phases
#~(modify-phases %standard-phases
(add-before 'configure 'patch-/bin/sh
(lambda _
(substitute* "auto/feature"
(("/bin/sh") (which "sh")))))
(replace 'configure
;; The configure script is hand-written, not from GNU autotools.
(lambda* (#:key configure-flags inputs #:allow-other-keys)
(setenv "CC" #$(cc-for-target))
;; Fix ./configure test for ‘#include <libxml/parser.h>’.
(setenv "CFLAGS" ; CPPFLAGS is not respected
(string-append "-I" (assoc-ref inputs "libxml2")
"/include/libxml2"))
(format #t "configure flags: ~s~%" flags)
(apply invoke "./configure" flags))))
(string-append "-I" (search-input-directory
inputs "/include/libxml2")))
(format #t "configure flags: ~s~%" configure-flags)
(apply invoke "./configure"
(string-append "--prefix=" #$output)
configure-flags)))
(add-after 'install 'install-man-page
(lambda _
(let ((man (string-append #$output "/share/man")))