diff --git a/opportunities.qmd b/opportunities.qmd index 7fdc061..26efa27 100644 --- a/opportunities.qmd +++ b/opportunities.qmd @@ -16,7 +16,7 @@ We welcome undergraduate students interested in gaining research experience in s - **Programming**: Experience with R or Python. - **Coursework**: Coursework in statistics, biostatistics, and epidemiology is helpful. - **Biology/Public Health**: Interest in infectious diseases, immunology, or public health. -- **Data Analysis**: Experience working with and anlyzing data. +- **Data Analysis**: Experience working with and analyzing data. - **Communication**: Strong written and verbal communication skills. ### How to Apply @@ -63,7 +63,7 @@ We are seeking postdoctoral researchers to join our team and lead cutting-edge r ### Current Openings -No current oppenings. +No current openings. diff --git a/tests/spelling.R b/tests/spelling.R index 295593a..837d031 100644 --- a/tests/spelling.R +++ b/tests/spelling.R @@ -1,4 +1,32 @@ if (requireNamespace("spelling", quietly = TRUE)) { + # error = FALSE: the vignette/.Rmd check reports spelling problems but does + # not fail the test run, so pre-existing/tolerated issues there don't block + # CI. The .qmd check below intentionally uses a hard stop() instead: .qmd + # spelling is newly covered and starts clean, so any new error should fail. spelling::spell_check_test(vignettes = TRUE, error = FALSE, skip_on_cran = TRUE) + + # Also check .qmd files, which spell_check_test() skips by default + wordlist <- if (file.exists("inst/WORDLIST")) { + readLines("inst/WORDLIST") + } else { + character() + } + qmd_files <- list.files( + ".", + pattern = "\\.qmd$", + recursive = TRUE, + full.names = TRUE + ) + if (length(qmd_files) > 0) { + results <- spelling::spell_check_files( + qmd_files, + ignore = wordlist, + lang = "en-US" + ) + if (nrow(results) > 0) { + print(results) + stop("Spelling errors found in .qmd files") + } + } }