From 4bf79350eab29d2d19794c45df39c6e0c4c5917e Mon Sep 17 00:00:00 2001
From: Marius Bakke <marius@gnu.org>
Date: Wed, 19 Jan 2022 09:33:29 +0100
Subject: gnu: ganeti: Fix test failure.

* gnu/packages/virtualization.scm (ganeti)[arguments]: Add phase to add
compatibility with newer Pyparsing.
---
 gnu/packages/virtualization.scm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/gnu/packages/virtualization.scm b/gnu/packages/virtualization.scm
index a16a12c7aa..e02eafe7c8 100644
--- a/gnu/packages/virtualization.scm
+++ b/gnu/packages/virtualization.scm
@@ -599,6 +599,12 @@ firmware blobs.  You can
                 (string-append match " < 1.2"))
                (("(.*QuickCheck.*) < 2\\.14" _ match)
                 (string-append match " < 2.15")))))
+         (add-after 'unpack 'pyparsing-compat
+           (lambda _
+             ;; Adjust for Pyparsing 3.0.  Remove for Ganeti 3.0.2+.
+             (substitute* "lib/qlang.py"
+               (("operatorPrecedence")
+                "infixNotation"))))
          (add-after 'unpack 'create-vcs-version
            (lambda _
              ;; If we are building from a git checkout, we need to create a
-- 
cgit v1.2.3