1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
|
From: Szymon Maksymiuk <32574056+maksymiuks@users.noreply.github.com>
Date: Mon, 14 Oct 2024 15:01:56 +0200
Subject: Fix test when .Library.site has length longer than 1
Bug: https://github.com/r-lib/backports/issues/83
Bug-Debian: https://bugs.debian.org/1077463
Origin: upstream, https://github.com/r-lib/backports/pull/84
--- r-cran-backports.orig/tests/test_dotlibPaths.R
+++ r-cran-backports/tests/test_dotlibPaths.R
@@ -15,4 +15,4 @@
.libPaths(f, include.site = FALSE)
expect_same()
}
-.libPaths(save, include.site = length(.Library.site) && .Library.site %in% save)
+.libPaths(save, include.site = length(.Library.site) && all(.Library.site %in% save))
|