pre-commit

Author: github-actions[bot]

R/testing.R

@@ -164,16 +164,16 @@ NULL
 style_empty <- function(text, base_indention = 0) {
   transformers <- list(
     # transformer functions
-    initialize        = list(
+    initialize = list(
       default_style_guide_attributes = default_style_guide_attributes
     ),
-    line_break        = NULL,
-    space             = NULL,
-    token             = NULL,
+    line_break = NULL,
+    space = NULL,
+    token = NULL,
     # transformer options
     use_raw_indention = FALSE,
-    reindention       = specify_reindention(),
-    indent_character  = " ",
+    reindention = specify_reindention(),
+    indent_character = " ",
     NULL
   )
   transformed_text <- parse_transform_serialize_r(text,
@@ -188,7 +188,7 @@ style_empty <- function(text, base_indention = 0) {
 style_op <- function(text, base_indention = 0L) {
   transformers <- list(
     # transformer functions
-    initialize        = list(
+    initialize = list(
       default_style_guide_attributes = default_style_guide_attributes
     ),
     line_break        = NULL,
@@ -198,8 +198,8 @@ style_op <- function(text, base_indention = 0L) {
     token             = NULL,
     # transformer options
     use_raw_indention = FALSE,
-    reindention       = specify_reindention(),
-    indent_character  = " ",
+    reindention = specify_reindention(),
+    indent_character = " ",
     NULL
   )
 

R/visit.R

@@ -109,7 +109,7 @@ make_visit_one <- function(funs) {
   body <- rlang::call2("{", !!!all_calls)
 
   env <- rlang::as_environment(funs, rlang::base_env())
-  rlang::new_function(rlang::pairlist2(pd_flat =), body, env)
+  rlang::new_function(rlang::pairlist2(pd_flat = ), body, env)
 }
 
 #' Propagate context to terminals