Fix thinkos

hadley · hadley · commit 60b14b78eb10 · 2025-07-24T13:55:51.000-04:00
diff --git a/tests/test-catch.R b/tests/test-catch.R
@@ -1,7 +1,7 @@
 library(testthat)
 
 local({
-  if (!is_installed("usethis", quietly = TRUE)) {
+  if (!requireNamespace("usethis", quietly = TRUE)) {
     return()
   }
 
@@ -47,6 +47,7 @@ local({
     )
 
     if (!catchEnabled) {
+      isWindows <- Sys.info()[["sysname"]] == "Windows"
       makevarsPath <- file.path(
         pkgPath,
         "src",

Original file line number	Diff line number	Diff line change
`@@ -1,7 +1,7 @@`
`1`	`1`	`library(testthat)`
`2`	`2`
`3`	`3`	`local({`
`4`		`- if (!is_installed("usethis", quietly = TRUE)) {`
	`4`	`+ if (!requireNamespace("usethis", quietly = TRUE)) {`
`5`	`5`	`return()`
`6`	`6`	`}`
`7`	`7`
`@@ -47,6 +47,7 @@ local({`
`47`	`47`	`)`
`48`	`48`
`49`	`49`	`if (!catchEnabled) {`
	`50`	`+ isWindows <- Sys.info()[["sysname"]] == "Windows"`
`50`	`51`	`makevarsPath <- file.path(`
`51`	`52`	`pkgPath,`
`52`	`53`	`"src",`