Add missing test to function_return_linter() (#1578)

r-lib · Sep 30, 2022 · 82ca559 · 82ca559
1 parent 799a643
commit 82ca559
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/tests/testthat/test-function_return_linter.R b/tests/testthat/test-function_return_linter.R
@@ -44,6 +44,16 @@ test_that("function_return_linter blocks simple disallowed usages", {
     linter
   )
 
+  expect_lint(
+    trim_some("
+      foo <- function(x) {
+        return(x + 1 ->> x)
+      }
+    "),
+    lint_msg,
+    linter
+  )
+
   expect_lint(
     trim_some("
       foo <- function(x) {