Skip to content

Commit

Permalink
[misc] use standardize() instead of standardize_color_names(). This s…
Browse files Browse the repository at this point in the history
…hould throw warnings on unused arguments
  • Loading branch information
JanMarvin committed Jan 15, 2025
1 parent 6ad0e19 commit 6d9f076
Show file tree
Hide file tree
Showing 3 changed files with 5 additions and 5 deletions.
6 changes: 3 additions & 3 deletions R/class-workbook.R
Original file line number Diff line number Diff line change
Expand Up @@ -7386,7 +7386,7 @@ wbWorkbook <- R6::R6Class(
...
) {

standardize_color_names(...)
standardize(...)

sheet <- private$get_sheet_index(sheet)
xml <- self$worksheets[[sheet]]$pageSetup
Expand Down Expand Up @@ -8197,7 +8197,7 @@ wbWorkbook <- R6::R6Class(
# cc <- wb$worksheets[[sheet]]$sheet_data$cc
# df_s <- as.data.frame(lapply(df, function(x) cc$c_s[cc$r %in% x]))

standardize_color_names(...)
standardize(...)

df <- dims_to_dataframe(dims, fill = TRUE)
sheet <- private$get_sheet_index(sheet)
Expand Down Expand Up @@ -8604,7 +8604,7 @@ wbWorkbook <- R6::R6Class(
cc <- cc[cc$r %in% dims, ]
styles <- unique(cc[["c_s"]])

standardize_color_names(...)
standardize(...)

for (style in styles) {
dim <- cc[cc$c_s == style, "r"]
Expand Down
2 changes: 1 addition & 1 deletion R/helper-functions.R
Original file line number Diff line number Diff line change
Expand Up @@ -1644,7 +1644,7 @@ create_shape <- function(
)
text_align <- alignment_map[text_align]

standardize_color_names(...)
standardize(...)

text <- fmt_txt2(text, text_color = text_color, text_transparency)

Expand Down
2 changes: 1 addition & 1 deletion R/utils.R
Original file line number Diff line number Diff line change
Expand Up @@ -1099,7 +1099,7 @@ fmt_txt <- function(
...
) {

standardize_color_names(...)
standardize(...)

xml_b <- NULL
xml_i <- NULL
Expand Down

0 comments on commit 6d9f076

Please sign in to comment.