From 61893a0199f191428107fbd53110ef99fb2d8238 Mon Sep 17 00:00:00 2001 From: AmiraBurns - USDA Date: Tue, 26 Mar 2024 10:43:16 -0600 Subject: [PATCH] update test_that tidy_dir to handle dir name updates --- tests/testthat/test-course.R | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/tests/testthat/test-course.R b/tests/testthat/test-course.R index b069d42a8..290158a98 100644 --- a/tests/testthat/test-course.R +++ b/tests/testthat/test-course.R @@ -112,7 +112,8 @@ test_that("tidy_unzip() deals with different directory names inside zip file", { dest <- tidy_unzip(tmp) found <- path_file(dest) - expected <- unzip(test_file("foo-rename.zip"), list=TRUE)$Name + foonames <- unzip(test_file("foo-rename.zip"), list=TRUE)$Name + expected <- (unique(path_dir(foonames))) fs::dir_delete(dest) expect_identical(found, expected)