guix_mirror_bot pushed a commit to branch r-team
in repository guix.

commit 63098433b36a8f86ecb2fc0267ae269a5d942d01
Author: Ricardo Wurmus <[email protected]>
AuthorDate: Wed Feb 18 16:07:29 2026 +0100

    gnu: r-trycatchlog: Replace custom phase with #:skipped-tests.
    
    * gnu/packages/cran.scm (r-trycatchlog)[arguments]: Remove phase
    'testthat-compatibility; provide #:skipped-tests argument.
    
    Change-Id: I4579e3c01efb238d1cc59ce59b0a45260f19fb30
---
 gnu/packages/cran.scm | 29 +++++++++++------------------
 1 file changed, 11 insertions(+), 18 deletions(-)

diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm
index 7a5abc2413..aa3cb65fee 100644
--- a/gnu/packages/cran.scm
+++ b/gnu/packages/cran.scm
@@ -21360,24 +21360,17 @@ regions.  Guaranteed to converge to local minimum of 
objective function.")
     (build-system r-build-system)
     (arguments
      (list
-      #:phases
-      '(modify-phases %standard-phases
-         (add-after 'unpack 'testthat-compatibility
-           (lambda _
-             ;; These tests use the procedure "with_mock", which has been
-             ;; removed from testthat.
-             (substitute* "tests/testthat/test_build_log_output.R"
-               ((".*platform-specific newline works.*" m)
-                (string-append m "skip('skip');\n")))
-             (substitute* "tests/testthat/test_is_windows.R"
-               ((".*conflict in Windows OS recognition throws a warning.*" m)
-                (string-append m "skip('skip');\n")))
-             (substitute* "tests/testthat/test_namespace_hooks.R"
-               ((".*internal package state is initialized.*" m)
-                (string-append m "skip('skip');\n")))
-             (substitute* "tests/testthat/test_platform_functions.R"
-               ((".*OS-specific newlines work.*" m)
-                (string-append m "skip('skip');\n"))))))))
+      #:skipped-tests
+      ;; These tests use the procedure "with_mock", which has been
+      ;; removed from testthat.
+      '(("test_build_log_output.R"
+         "platform-specific newline works")
+        ("test_is_windows.R"
+         "conflict in Windows OS recognition throws a warning")
+        ("test_namespace_hooks.R"
+         "internal package state is initialized")
+        ("test_platform_functions.R"
+         "OS-specific newlines work"))))
     (native-inputs (list r-covr r-knitr r-testthat))
     (home-page "https://github.com/aryoda/tryCatchLog";)
     (synopsis "Advanced tryCatch and try functions")

Reply via email to