diff --git a/R/rules-line-breaks.R b/R/rules-line-breaks.R index a02177e5e..5a007bdff 100644 --- a/R/rules-line-breaks.R +++ b/R/rules-line-breaks.R @@ -449,7 +449,7 @@ remove_empty_lines_after_opening_and_before_closing_braces <- function(pd) { } -set_line_breaks_between_top_level_exprs <- function(pd, allowed_blank_lines = 2L) { +set_line_breaks_between_top_level_exprs <- function(pd, allowed_blank_lines = 2L) { pd$lag_newlines <- pmin(pd$lag_newlines, allowed_blank_lines + 1L) pd } diff --git a/R/style-guides.R b/R/style-guides.R index b11ff613c..93ea89dd2 100644 --- a/R/style-guides.R +++ b/R/style-guides.R @@ -139,8 +139,8 @@ tidyverse_style <- function(scope = "tokens", if (strict) remove_line_break_before_round_closing_after_curly, remove_line_breaks_in_fun_dec = if (strict) remove_line_breaks_in_fun_dec, - set_line_breaks_between_top_level_exprs = - if (strict) set_line_breaks_between_top_level_exprs , + set_line_breaks_between_top_level_exprs = + if (strict) set_line_breaks_between_top_level_exprs, style_line_break_around_curly = partial( style_line_break_around_curly, strict