allow_trailing=FALSE lints when EQ_ASSIGN used

r-lib · Jan 28, 2025 · 73e3cac · 73e3cac
1 parent 69841ea
commit 73e3cac
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 0 deletions.
diff --git a/R/assignment_linter.R b/R/assignment_linter.R
@@ -111,6 +111,7 @@ assignment_linter <- function(operator = c("<-", "<<-"),
     c(
       "//LEFT_ASSIGN",
       "//RIGHT_ASSIGN",
+      "//EQ_ASSIGN",
       "//EQ_SUB",
       "//EQ_FORMALS",
       "//SPECIAL[text() = '%<>%']"

diff --git a/tests/testthat/test-assignment_linter.R b/tests/testthat/test-assignment_linter.R
@@ -134,6 +134,12 @@ test_that("arguments handle trailing assignment operators correctly", {
     ),
     linter
   )
+
+  expect_lint(
+    "a =\n1",
+    "= should not be trailing",
+    linter
+  )
 })
 
 test_that("allow_trailing interacts correctly with comments in braced expressions", {