From 73e3cac3629daa2fc86e07751f9bf638fd163e63 Mon Sep 17 00:00:00 2001 From: Michael Chirico Date: Tue, 28 Jan 2025 21:58:04 +0000 Subject: [PATCH] allow_trailing=FALSE lints when EQ_ASSIGN used --- R/assignment_linter.R | 1 + tests/testthat/test-assignment_linter.R | 6 ++++++ 2 files changed, 7 insertions(+) diff --git a/R/assignment_linter.R b/R/assignment_linter.R index 683407cb9..cda46512e 100644 --- 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 index b764d00ee..b2056e8b5 100644 --- 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", {