me/guix
Archived
1
0
Fork 0
Code Activity

gnu: nghttp2: Use G-expressions.

Browse source 
* gnu/packages/web.scm (nghttp2)[arguments]: Convert to gexp.
This commit is contained in:
Marius Bakke 2022-06-26 02:43:01 +02:00
parent 3ab568573e
commit 87c8b40871
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 26 additions and 26 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

52
gnu/packages/web.scm
View file

@ -7515,32 +7515,32 @@ derivation by David Revoy from the original MonsterID by Andreas Gohr.")
libxml2 ; for ‘nghttp -a’ libxml2 ; for ‘nghttp -a’
openssl))) openssl)))
(arguments (arguments
`(#:configure-flags (list
(list (string-append "--libdir=" (assoc-ref %outputs "lib") "/lib") #:configure-flags
"--enable-app" ; build all the tools #~(list (string-append "--libdir=" #$output:lib "/lib")
"--enable-hpack-tools" ; ...all the tools "--enable-app" ; build all the tools
"--disable-examples" "--enable-hpack-tools" ; ...all the tools
"--disable-static" ; don't bother building .a files "--disable-examples"
,@(if (%current-target-system) "--disable-static" ; don't bother building .a files
'("--disable-python-bindings") #$@(if (%current-target-system)
'())) '("--disable-python-bindings")
#:phases '()))
(modify-phases %standard-phases #:phases
(add-after 'unpack 'break-circular-reference #~(modify-phases %standard-phases
;; libnghttp2.pc by default retains a reference to the ‘out’ output, (add-after 'unpack 'break-circular-reference
;; which is not allowed. Break this cycle. While we could install ;; libnghttp2.pc by default retains a reference to the ‘out’ output,
;; only the library to ‘out’ and move everything else to a separate ;; which is not allowed. Break this cycle. While we could install
;; output, this would inconvenience the majority of (human) users. ;; only the library to ‘out’ and move everything else to a separate
(lambda* (#:key outputs #:allow-other-keys) ;; output, this would inconvenience the majority of (human) users.
(substitute* "lib/libnghttp2.pc.in" (lambda _
(("@prefix@") (substitute* "lib/libnghttp2.pc.in"
(assoc-ref outputs "lib"))) (("@prefix@")
#t)) #$output:lib))))
(add-before 'check 'set-timezone-directory (add-before 'check 'set-timezone-directory
(lambda* (#:key inputs native-inputs #:allow-other-keys) (lambda* (#:key inputs native-inputs #:allow-other-keys)
(setenv "TZDIR" (search-input-directory (setenv "TZDIR" (search-input-directory
(or native-inputs inputs) (or native-inputs inputs)
"share/zoneinfo"))))))) "share/zoneinfo")))))))
(home-page "https://nghttp2.org/") (home-page "https://nghttp2.org/")
(synopsis "HTTP/2 protocol client, proxy, server, and library") (synopsis "HTTP/2 protocol client, proxy, server, and library")
(description (description