From 45939110336b0a4de5194312198622ac91c38b82 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ma=C3=ABlle=20Salmon?= Date: Mon, 1 Jul 2024 15:53:40 +0200 Subject: [PATCH] refactor: simplify apply() call to obey lintr --- R/layers.R | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/R/layers.R b/R/layers.R index f834d64..238b788 100644 --- a/R/layers.R +++ b/R/layers.R @@ -267,9 +267,7 @@ namespace_layer_names <- function(wfs, layers) { info$layer_name %in% layers, c("layer_namespace", "layer_name") ] %>% - apply(1L, FUN = function(x) { - paste0(x, collapse = ":") - }) + apply(1L, FUN = paste0, collapse = ":") } get_layer_format <- function(layer, wfs) {