more inlining

r-lib · Aug 4, 2024 · b0a2423 · b0a2423
1 parent 78939d2
commit b0a2423
Showing 1 changed file with 3 additions and 6 deletions.
diff --git a/R/methods.R b/R/methods.R
@@ -98,15 +98,12 @@ print.lints <- function(x, ...) {
       lapply(x, print, ...)
     }
 
-    if (isTRUE(settings$error_on_lint)) {
-      quit("no", 31L, FALSE) # nocov
-    }
+    if (isTRUE(settings$error_on_lint)) quit("no", 31L, FALSE) # nocov
   }
 
   if (length(x) == 0L) {
-    cli_inform(c(i = "No lints found."))
-    # Empty lints: clear RStudio source markers
-    if (use_rstudio_source_markers) rstudio_source_markers(x)
+    cli_inform(c("i" = "No lints found."))
+    if (use_rstudio_source_markers) rstudio_source_markers(x) # clear RStudio source markers
   }
 
   invisible(x)