diff --git a/.github/workflows/R-CMD-check.yaml b/.github/workflows/R-CMD-check.yaml index 0d317ee..9934890 100644 --- a/.github/workflows/R-CMD-check.yaml +++ b/.github/workflows/R-CMD-check.yaml @@ -66,6 +66,7 @@ jobs: run: | remotes::install_deps(dependencies = TRUE, force = TRUE) remotes::install_cran("devtools") + install.packages("quarto") sessionInfo() shell: Rscript {0} diff --git a/tests/testthat/test-quizzes.R b/tests/testthat/test-quizzes.R index fa8bd62..262be8d 100644 --- a/tests/testthat/test-quizzes.R +++ b/tests/testthat/test-quizzes.R @@ -10,19 +10,11 @@ test_that("Quiz checks", { bad_quiz <- readLines(bad_quiz_path()) bad_quiz_specs <- parse_quiz(bad_quiz) - # THe following checks *should fail* because we're giving it a bad quiz. - bad_quiz_checks <- try(check_all_questions(bad_quiz_specs), silent = TRUE) - ## Make a temporary quiz directory quiz_dir <- dirname(good_quiz_path()) - ## Now check the quizzes in that directory - # The following checks *should also fail* because the bad quiz is in there - all_quiz_results <- try(check_quizzes(quiz_dir = quiz_dir), silent = TRUE) - ## TEST HERE: # 1. quiz_error_report.tsv should be made - # 2. bad quiz should have errors - # 3. good quiz should pass! + # 2. good quiz should pass! })