Fix spell_check_notebooks() test

jabenninghoff · Apr 25, 2022 · 9f816c3 · 9f816c3
1 parent 105329a
commit 9f816c3
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/inst/templates/test-spelling.R b/inst/templates/test-spelling.R
@@ -28,7 +28,9 @@ test_that("Notebooks have no spelling errors", {
   skip_on_covr()
   withr::local_dir(pkg_dir)
   if (fs::dir_exists("analysis")) {
-    expect_identical(rdev::spell_check_notebooks()$word, character(0))
+    # spell_check_notebooks()$word is NULL if there are no notebooks or only empty notebooks
+    results <- rdev::spell_check_notebooks()
+    expect_true(is.null(results$word) || identical(results$word, character(0)))
   } else {
     expect_error(rdev::spell_check_notebooks(), "'analysis' directory not found")
   }

diff --git a/tests/testthat/test-spelling.R b/tests/testthat/test-spelling.R
@@ -28,7 +28,9 @@ test_that("Notebooks have no spelling errors", {
   skip_on_covr()
   withr::local_dir(pkg_dir)
   if (fs::dir_exists("analysis")) {
-    expect_identical(rdev::spell_check_notebooks()$word, character(0))
+    # spell_check_notebooks()$word is NULL if there are no notebooks or only empty notebooks
+    results <- rdev::spell_check_notebooks()
+    expect_true(is.null(results$word) || identical(results$word, character(0)))
   } else {
     expect_error(rdev::spell_check_notebooks(), "'analysis' directory not found")
   }