More housekeeping

R/find_exports.R

@@ -20,7 +20,7 @@ find_extendr_attrs_ids <- function(lns) {
 }
 
 # Gets function/module metadata from a subset of lines.
-# Finds first occurence of `fn` or `impl`.
+# Finds first occurrence of `fn` or `impl`.
 extract_meta <- function(lns) {
   # Matches fn|impl<'a> item_name
   result <- stringi::stri_match_first_regex(

R/source.R

@@ -39,7 +39,7 @@
 #'   calls to [rust_source()].
 #' @param quiet Logical indicating whether compile output should be generated or not.
 #' @param use_rtools Logical indicating whether to append the path to Rtools
-#'   to the `PATH` variable on Windows using the `RTOOLS40_HOME` environment
+#'   to the `PATH` variable on Windows using the `RTOOLS4X_HOME` environment
 #'   variable (if it is set). The appended path depends on the process
 #'   architecture. Does nothing on other platforms.
 #' @param use_dev_extendr Logical indicating whether to use development version of

R/try_save_all.R

@@ -1,6 +1,6 @@
 #' Try to save open files if \pkg{rextendr} is called from an IDE.
 #'
-#' Uses rstudio API (if available) to save modfied files.
+#' Uses rstudio API (if available) to save modified files.
 #' Improves package development experience within RStudio.
 #' @param quiet Logical scalar indicating whether the output should be quiet (`TRUE`)
 #'   or verbose (`FALSE`).

tests/testthat/test-make-module-macro.R

@@ -84,11 +84,11 @@ test_that("Macro generation fails on invalid comments in code", {
   )
   expect_rextendr_error(
     make_module_macro("/*/*/**/"),
-    "Found 3 occurences"
+    "Found 3 occurrences"
   )
   expect_rextendr_error(
     make_module_macro("/*/*/**/"),
-    "Found 1 occurence"
+    "Found 1 occurrence"
   )
 
   expect_rextendr_error(