fix lints

Author: IndrajeetPatil

.lintr

@@ -8,7 +8,6 @@ linters: linters_with_tags(
     line_length_linter(120L),
     namespace_linter = NULL,
     nested_ifelse_linter = NULL,
-    # TODO: remove this once the lint message is fixed
     nzchar_linter = NULL,
     object_name_linter = NULL,
     object_length_linter(70L),

R/addins.R

@@ -72,7 +72,7 @@ style_active_file <- function() {
   }
   rstudioapi::modifyRange(
     c(1L, 1L, length(context$contents) + 1L, 1L),
-    paste0(ensure_last_n_empty(out), collapse = "\n"),
+    paste(ensure_last_n_empty(out), collapse = "\n"),
     id = context$id
   )
   if (save_after_styling_is_active() && context$path != "") {
@@ -132,7 +132,7 @@ style_selection <- function() {
   )
   rstudioapi::modifyRange(
     context$selection[[1L]]$range,
-    paste0(c(
+    paste(c(
       out,
       if (context$selection[[1L]]$range$end[2L] == 1L) ""
     ), collapse = "\n"),

R/detect-alignment-utils.R

@@ -161,7 +161,7 @@ alignment_serialize <- function(pd_sub) {
   if (anyNA(out)) {
     return(NA)
   }
-  paste0(out, collapse = "")
+  paste(out, collapse = "")
 }
 
 #' Check if spacing around comma is correct

R/roxygen-examples-parse.R

@@ -68,7 +68,7 @@ parse_roxygen <- function(roxygen) {
 roxygen_remove_extra_brace <- function(parsed) {
   parsed <- rlang::try_fetch(
     {
-      parse(text = paste0(gsub("^\\\\[[:alpha:]]*", "", parsed), collapse = ""))
+      parse(text = paste(gsub("^\\\\[[:alpha:]]*", "", parsed), collapse = ""))
       parsed
     },
     error = function(e) {