From 0d1c22494bca317e99ee3260c144fb70b1aa34ac Mon Sep 17 00:00:00 2001
From: Marius Bakke <marius@gnu.org>
Date: Fri, 12 Aug 2022 22:16:54 +0200
Subject: 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(-)

(limited to 'gnu')

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
-- 
cgit v1.2.3