@@ -268,21 +268,20 @@ set_line_break_after_assignment <- function(pd) {
268268
269269# ' Set line break for multi-line function calls
270270# ' @param pd A parse table.
271- # ' @param except_token_after A character vector with tokens after "'('" that do
272- # ' not cause a line break after "'('".
273- # ' @param except_text_before A character vector with text before "'('" that do
274- # ' not cause a line break after "'('".
275- # ' @param except_token_before A character vector with text before "')'" that do
276- # ' not cause a line break before "')'".
277- # ' @param force_text_before A character vector with text before "'('" that
278- # ' forces a line break after every argument in the call.
271+ # ' @param except_token_before A character vector with tokens that do
272+ # ' not cause a line break after them.
279273# ' @name set_line_break_if_call_is_multi_line
280274# '
281275# ' @keywords internal
282276NULL
283277
284278# ' Sets line break after opening parenthesis
285- # '
279+ # ' @param pd The parse table.
280+ # ' @param except_token_after The tokens after the token that cause an exception.
281+ # ' @param except_text_before A character vector with text before a token that
282+ # ' does not cause a line break.
283+ # ' @param force_text_before A character vector with text before "'('" that
284+ # ' forces a line break after every argument in the call.
286285# ' @details
287286# ' In general, every call that is multi-line has a line break after the opening
288287# ' parenthesis. Exceptions:
@@ -341,7 +340,7 @@ set_line_break_after_opening_if_call_is_multi_line <- function(pd,
341340# ' position of the first named argument and breaks returns the index of it.
342341# ' If there is no named argument, the line is broken right after the opening
343342# ' parenthesis.
344- # ' @inheritParams set_line_break_if_call_is_multi_line
343+ # ' @param pd A parse table.
345344# ' @keywords internal
346345find_line_break_position_in_multiline_call <- function (pd ) {
347346 candidate <- (which(pd $ token == " EQ_SUB" ) - 1L )[1L ]
@@ -377,7 +376,8 @@ set_line_break_before_closing_call <- function(pd, except_token_before) {
377376}
378377
379378
380- # ' @rdname set_line_break_if_call_is_multi_line
379+ # ' @describeIn set_line_break_if_call_is_multi_line Remove line breaks in
380+ # ' function calls.
381381# ' @keywords internal
382382remove_line_break_in_fun_call <- function (pd , strict ) {
383383 if (is_function_call(pd )) {
0 commit comments