styler

Author: dajmcdon

R/archive.R

@@ -679,7 +679,7 @@ print.epi_archive <- function(x, ..., class = TRUE, methods = TRUE) {
 #' @export
 #'
 #' @aliases grouped_epi_archive
-group_by.epi_archive <- function(.data, ..., .add = FALSE, 
+group_by.epi_archive <- function(.data, ..., .add = FALSE,
                                  .drop = dplyr::group_by_drop_default(.data)) {
   # `add` makes no difference; this is an ungrouped `epi_archive`.
   detailed_mutate <- epix_detailed_restricted_mutate(.data, ...)

R/methods-epi_archive.R

@@ -237,7 +237,7 @@ epix_fill_through_version <- function(x, fill_versions_end,
 #'   Default here is `TRUE`.
 #' @return the resulting `epi_archive`
 #'
-#' @details In all cases, `clobberable_versions_start` will be set to the 
+#' @details In all cases, `clobberable_versions_start` will be set to the
 #'   earliest version that could be clobbered in either input archive.
 #'
 #' @examples

tests/testthat/test-epix_merge.R

@@ -177,7 +177,7 @@ test_that("epix_merge forbids and warns on metadata and naming issues", {
     ),
     regexp = "overlapping.*names"
   )
-  
+
   skip("Additional metadata is no longer used, not tested.")
   expect_warning(
     epix_merge(