From fd626f197277c2ab6aeb9bf3e0d5ef054a4ef61a Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Thu, 27 Nov 2025 12:54:48 +0100
Subject: [PATCH] gnu: r-operator-tools: Adjust for testthat compatibility.

* gnu/packages/cran.scm (r-operator-tools)[arguments]: Add phase
'testthat-compatibility.

Change-Id: I6d25d3cf049a294f8da11a8fbcd159cc227ae0ab
---
 gnu/packages/cran.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm
index 7222d89dc09..b5a97eb4e15 100644
--- a/gnu/packages/cran.scm
+++ b/gnu/packages/cran.scm
@@ -24102,6 +24102,15 @@ Files, Fine-tunes, Moderations, and legacy Engines endpoints.")
                 "1v4dg7xhz24dnp0zxn815x1405ig64ibii6y40la1gvmzcc41dz5"))))
     (properties `((upstream-name . "operator.tools")))
     (build-system r-build-system)
+    (arguments
+     (list
+      #:phases
+      '(modify-phases %standard-phases
+         ;; This deprecated procedure has been removed in testthat.
+         (add-after 'unpack 'testthat-compatibility
+           (lambda _
+             (substitute* "tests/testthat/test-operators.R"
+               (("is_true\\(\\)") "expect_true")))))))
     (native-inputs (list r-testthat))
     (home-page "https://github.com/decisionpatterns/operator.tools")
     (synopsis "Utilities for working with R's operators")