~ruther/guix-local: gnu: r-mzr: Restore tests that failed because of libxml2.

32ea496b55e0e77acedd87c55b1590602af4964c — Ricardo Wurmus 4 months ago 19b8400

gnu: r-mzr: Restore tests that failed because of libxml2.

* gnu/packages/bioconductor.scm (r-mzr)[arguments]: Restore two tests; fix
them by adding 'ensure-libxml2-works phase.

Change-Id: Ifeb3667449e862826a402b8c1ce37e4bcc92f21b

patch browse .tar.gz

1 files changed, 6 insertions(+), 5 deletions(-)

M gnu/packages/bioconductor.scm

M gnu/packages/bioconductor.scm => gnu/packages/bioconductor.scm +6 -5

@@ 11838,12 11838,13 @@ specific parser.")
     (arguments
      `(#:phases
        (modify-phases %standard-phases
-         (add-after 'unpack 'skip-bad-tests
+         ;; For unknown reasons, the libxml2 features are misreported without
+         ;; this call prior to running BiocGenerics:::testPackage("mzR").
+         (add-after 'unpack 'ensure-libxml2-works
            (lambda _
-             ;; These tests need Internet access to load XML schemas.
-             (with-directory-excursion "inst/unitTests/"
-               (delete-file "test_isolationWindow.R")
-               (delete-file "test_mzid.R"))))
+             (substitute* "tests/runTests.R"
+               (("library\\(\"mzR\"\\)" m)
+                (string-append "XML::libxmlFeatures()\n" m)))))
          (add-after 'unpack 'use-system-boost
            (lambda _
              (substitute* "src/Makevars"