me
/
guix
Archived
1
0
Fork 0

gnu: nginx: Allow to pass configure-flags.

* gnu/packages/web.scm (nginx)[arguments]<configure>:
Accept '#:configure-flags'.
master
Oleg Pykhalov 2020-10-11 13:13:08 +03:00
parent 34d436a408
commit 2a7f4be8f3
No known key found for this signature in database
GPG Key ID: 167F8EA5001AFA9C
1 changed files with 25 additions and 24 deletions

View File

@ -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)