Skip to content

Commit

Permalink
Fix lints
Browse files Browse the repository at this point in the history
  • Loading branch information
Bisaloo committed Mar 25, 2023
1 parent dde72f1 commit 564942d
Show file tree
Hide file tree
Showing 4 changed files with 14 additions and 15 deletions.
12 changes: 6 additions & 6 deletions R/validate_xltemplate.R
Original file line number Diff line number Diff line change
Expand Up @@ -27,11 +27,11 @@
#' minimal = TRUE
#' )
validate_xltemplate <- function(
template_file,
template_sheet = 1,
marker_open = "{{", marker_close = "}}",
minimal = FALSE,
error = FALSE
template_file,
template_sheet = 1,
marker_open = "{{", marker_close = "}}",
minimal = FALSE,
error = FALSE
) {

cnd_msg <- NULL
Expand All @@ -51,7 +51,7 @@ validate_xltemplate <- function(
ngettext(
nrow(template) - nrow(template_minimal),
"%s and includes %d field not defining any variable",
"%s and includes %d fields not defining any variable",
"%s and includes %d fields not defining any variable"
),
"The provided template is not minimal",
nrow(template) - nrow(template_minimal)
Expand Down
14 changes: 7 additions & 7 deletions R/xlsx_cutter.R
Original file line number Diff line number Diff line change
Expand Up @@ -39,10 +39,10 @@
#' )
#'
xlsx_cutter <- function(
data_files, template_file,
data_sheet = 1, template_sheet = 1,
marker_open = "{{", marker_close = "}}"
) {
data_files, template_file,
data_sheet = 1, template_sheet = 1,
marker_open = "{{", marker_close = "}}"
) {

template <- tidyxl::xlsx_cells(template_file, template_sheet)

Expand All @@ -66,9 +66,9 @@ xlsx_cutter <- function(
}

single_xlsx_cutter <- function(
data_file, template_file, data_sheet,
coords, noms
) {
data_file, template_file, data_sheet,
coords, noms
) {

d <- tidyxl::xlsx_cells(data_file, sheets = data_sheet)

Expand Down
2 changes: 1 addition & 1 deletion tests/testthat.R
Original file line number Diff line number Diff line change
Expand Up @@ -7,6 +7,6 @@
# * https://testthat.r-lib.org/reference/test_package.html#special-files

library(testthat)
library(xlcutter)
library(xlcutter) # nolint

test_check("xlcutter")
1 change: 0 additions & 1 deletion tests/testthat/test-validate_xltemplate.R
Original file line number Diff line number Diff line change
Expand Up @@ -70,4 +70,3 @@ test_that("plural works in message", {
)

})

0 comments on commit 564942d

Please sign in to comment.