gnu: nginx: Allow to pass configure-flags.
* gnu/packages/web.scm (nginx)[arguments]<configure>: Accept '#:configure-flags'.master
parent
34d436a408
commit
2a7f4be8f3
|
@ -254,9 +254,9 @@ Interface} specification.")
|
||||||
#t))
|
#t))
|
||||||
(replace 'configure
|
(replace 'configure
|
||||||
;; The configure script is hand-written, not from GNU autotools.
|
;; The configure script is hand-written, not from GNU autotools.
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda* (#:key configure-flags outputs #:allow-other-keys)
|
||||||
(let ((flags
|
(let ((flags
|
||||||
(list (string-append "--prefix=" (assoc-ref outputs "out"))
|
(append (list (string-append "--prefix=" (assoc-ref outputs "out"))
|
||||||
"--with-http_ssl_module"
|
"--with-http_ssl_module"
|
||||||
"--with-http_v2_module"
|
"--with-http_v2_module"
|
||||||
"--with-pcre-jit"
|
"--with-pcre-jit"
|
||||||
|
@ -278,7 +278,8 @@ Interface} specification.")
|
||||||
;; "guix package --search="
|
;; "guix package --search="
|
||||||
(_ "UNSUPPORTED"))))
|
(_ "UNSUPPORTED"))))
|
||||||
(string-append "--crossbuild="
|
(string-append "--crossbuild="
|
||||||
system ":" release ":" machine)))))
|
system ":" release ":" machine)))
|
||||||
|
configure-flags)))
|
||||||
(setenv "CC" "gcc")
|
(setenv "CC" "gcc")
|
||||||
(format #t "configure flags: ~s~%" flags)
|
(format #t "configure flags: ~s~%" flags)
|
||||||
(apply invoke "./configure" flags)
|
(apply invoke "./configure" flags)
|
||||||
|
|
Reference in New Issue