diff --git a/tests/testthat/test-assignment_linter.R b/tests/testthat/test-assignment_linter.R index aa32792af..145207f6c 100644 --- a/tests/testthat/test-assignment_linter.R +++ b/tests/testthat/test-assignment_linter.R @@ -1,4 +1,5 @@ context("assignment_linter") +options(encoding = "UTF-8") test_that("returns the correct linting", { expect_lint("blah", NULL, assignment_linter) @@ -31,20 +32,4 @@ test_that("returns the correct linting", { rex("Use <-, not =, for assignment."), assignment_linter) - test_that("handles unicode characters correctly", { - expect_lint("Ħ = 1", - list(c(column_number = 3L)), - assignment_linter) - - expect_lint("Ħ = 1;aèn = 2", - list(c(column_number = 3L), - c(column_number = 11L)), - assignment_linter) - - expect_lint("a = 1;aèn = 2", - list(c(column_number = 3L), - c(column_number = 11L)), - assignment_linter) - - }) }) diff --git a/tests/testthat/test-line_length_linter.R b/tests/testthat/test-line_length_linter.R index 1eda8a50b..4d2d2031a 100644 --- a/tests/testthat/test-line_length_linter.R +++ b/tests/testthat/test-line_length_linter.R @@ -31,14 +31,3 @@ test_that("returns the correct linting", { rex("lines should not be more than 20 characters"), line_length_linter(20)) }) -test_that("works with unicode characters", { - - expect_lint("'☂☂☂☂☂☂☂☂☂☂☂☂☂☂☂☂☂'", - NULL, - line_length_linter(20)) - - expect_lint("'☂☂☂☂☂☂☂☂☂☂☂☂☂☂☂☂☂☂☂'", - rex("lines should not be more than 20 characters"), - line_length_linter(20)) - -})