02/16: gnu: nghttp2-for-node: Fix Python version check.

[guix-commits]

mbakke pushed a commit to branch core-updates
in repository guix.

commit 0d1c22494bca317e99ee3260c144fb70b1aa34ac
Author: Marius Bakke <marius@gnu.org>
AuthorDate: Fri Aug 12 22:16:54 2022 +0200

    gnu: nghttp2-for-node: Fix Python version check.
    
    * gnu/packages/web.scm (nghttp2-for-node)[arguments]: New field.
---
 gnu/packages/web.scm | 15 ++++++++++++++-
 1 file changed, 14 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm
index 0d9bdb13be..7f0f265217 100644
--- a/gnu/packages/web.scm
+++ b/gnu/packages/web.scm
@@ -7589,7 +7589,20 @@ compressed JSON header blocks.
                                    "nghttp2-" version ".tar.xz"))
                (sha256
                 (base32
-                 "0p9wvva4g8hwj55x19rbyvnq2dbsnf65rphhxnpqs7ll54xlg6an")))))))
+                 "0p9wvva4g8hwj55x19rbyvnq2dbsnf65rphhxnpqs7ll54xlg6an"))))
+     (arguments
+      (substitute-keyword-arguments (package-arguments nghttp2)
+        ((#:phases phases #~%standard-phases)
+         #~(modify-phases #$phases
+             (add-after 'unpack 'workaround-broken-python-version-check
+               (lambda _
+                 (substitute* "configure"
+                   ;; The configure script uses a string comparison to
+                   ;; determine whether the Python interpreter is recent
+                   ;; enough, which fails when comparing 3.8 to 3.10.
+                   ;; Convert to tuples for a more reliable check.
+                   (("print \\(ver >= '3\\.8'\\)")
+                    "print (tuple(map(int, ver.split('.'))) >= 
(3,8))")))))))))))
 
 (define-public hpcguix-web
   (package