Typo fix

rOpenGov · Jun 28, 2023 · cb8ec7e · cb8ec7e
1 parent cfdaf37
commit cb8ec7e
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/tests/testthat/test_04_get.R b/tests/testthat/test_04_get.R
@@ -50,11 +50,11 @@ test_that("get_eurostat (dissemination API) works correctly with multi-frequency
 test_that("get_eurostat return right classes", {
   skip_on_cran()
   skip_if_offline()
-  expect_true(all(c("character", "numeric") %in%
+  expect_true(all(c("character", "numeric", "Date") %in%
     sapply(get_eurostat("road_eqr_trams"), class)))
-  expect_true(all(c("character", "numeric") %in%
+  expect_true(all(c("character", "numeric", "Date") %in%
     sapply(
-      get_eurostat("road_eqr_trams"),
+      get_eurostat("road_eqr_trams", keepFlags = TRUE),
       class
     )))
 })

diff --git a/tests/testthat/test_99_restore_cache.R b/tests/testthat/test_99_restore_cache.R
@@ -7,9 +7,9 @@ test_that("Restore user cache dir after testing", {
   expect_message(clean_eurostat_cache(config = FALSE))
 
   user_dir <- Sys.getenv("TEST_EUROSTAT_CURRENT_CACHE")
-  curret_env <- Sys.getenv("EUROSTAT_CACHE_DIR")
+  current_env <- Sys.getenv("EUROSTAT_CACHE_DIR")
 
-  expect_false(curret_env == user_dir)
+  expect_false(current_env == user_dir)
 
   expect_message(expect_message(
     set_eurostat_cache_dir(user_dir)