drop "the equivalent"

r-lib · Dec 6, 2023 · fc612f8 · fc612f8
1 parent e0be1d9
commit fc612f8
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/R/is_numeric_linter.R b/R/is_numeric_linter.R
@@ -97,7 +97,7 @@ is_numeric_linter <- function() {
       class_expr,
       source_expression = source_expression,
       lint_message = paste(
-        'Use is.numeric(x) instead of the equivalent class(x) %in% c("integer", "numeric").',
+        'Use is.numeric(x) instead of class(x) %in% c("integer", "numeric").',
         "Use is.double(x) to test for objects stored as 64-bit floating point."
       ),
       type = "warning"

diff --git a/tests/testthat/test-is_numeric_linter.R b/tests/testthat/test-is_numeric_linter.R
@@ -48,7 +48,7 @@ test_that("is_numeric_linter blocks disallowed usages involving ||", {
 
 test_that("is_numeric_linter blocks disallowed usages involving %in%", {
   linter <- is_numeric_linter()
-  lint_msg <- rex::rex('Use is.numeric(x) instead of the equivalent class(x) %in% c("integer", "numeric")')
+  lint_msg <- rex::rex('Use is.numeric(x) instead of class(x) %in% c("integer", "numeric")')
 
   expect_lint("class(x) %in% c('integer', 'numeric')", lint_msg, linter)
   expect_lint('class(x) %in% c("numeric", "integer")', lint_msg, linter)
@@ -58,7 +58,7 @@ test_that("raw strings are handled properly when testing in class", {
   skip_if_not_r_version("4.0.0")
 
   linter <- is_numeric_linter()
-  lint_msg <- rex::rex('Use is.numeric(x) instead of the equivalent class(x) %in% c("integer", "numeric")')
+  lint_msg <- rex::rex('Use is.numeric(x) instead of class(x) %in% c("integer", "numeric")')
 
   expect_lint("class(x) %in% c(R'(numeric)', 'integer', 'factor')", NULL, linter)
   expect_lint("class(x) %in% c('numeric', R'--(integer)--', y)", NULL, linter)