Skip to content

Commit 017d4b5

Browse files
committed
4x tests due to pak not liking the CI environment.
Error: Error: ! error in pak subprocess Caused by error in `get_user_cache_dir()`: ! R_USER_CACHE_DIR env var not set during package check, see https://github.com/r-lib/pkgcache#README
1 parent 7679b50 commit 017d4b5

File tree

2 files changed

+6
-0
lines changed

2 files changed

+6
-0
lines changed

tests/testthat/test-dockitect-from-environment.R

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -21,6 +21,7 @@ test_that("dk_from_session(): creates dockerfile from current session", {
2121
test_that("dk_add_sysreqs(): adds system requirements correctly", {
2222
# Skip if 'pak' not available
2323
skip_if_not_installed("pak")
24+
skip_on_ci()
2425

2526
# Mock functions for testing to avoid long loading times ----
2627
mock_pkg_sysreqs <- function(packages, sysreqs_platform = "ubuntu") {

tests/testthat/test-dockitect-templates.R

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -25,6 +25,9 @@ test_that("dk_register_template(): registers and retrieves custom templates", {
2525

2626
# Test dk_template_base() ----
2727
test_that("dk_template_base(): creates a base R dockerfile", {
28+
29+
skip_on_ci()
30+
2831
df <- dk_template_base(r_version = "4.4.0")
2932
expect_true(is_dockerfile(df))
3033
expect_true(has_instruction(df, "FROM"))
@@ -46,6 +49,7 @@ test_that("dk_template_base(): creates a base R dockerfile", {
4649

4750
# Test dk_template_shiny() ----
4851
test_that("dk_template_shiny(): creates a Shiny app dockerfile", {
52+
skip_on_ci()
4953
df <- dk_template_shiny(r_version = "4.4.0", port = 3838)
5054
expect_true(is_dockerfile(df))
5155
expect_true(has_instruction(df, "FROM"))
@@ -70,6 +74,7 @@ test_that("dk_template_shiny(): creates a Shiny app dockerfile", {
7074

7175
# Test dk_template_plumber() ----
7276
test_that("dk_template_plumber(): creates a Plumber API dockerfile", {
77+
skip_on_ci()
7378
df <- dk_template_plumber(r_version = "4.4.0", port = 8000, api_file = "plumber.R")
7479
expect_true(is_dockerfile(df))
7580
expect_true(has_instruction(df, "FROM"))

0 commit comments

Comments
 (0)