From 2003a2e9139fc557da36f721a1f5fed7119c6b1f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ma=C3=ABlle=20Salmon?= <maelle.salmon@yahoo.se>
Date: Mon, 1 Jul 2024 15:44:08 +0200
Subject: [PATCH] refactor: simplify map() call to follow lintr's rec

---
 R/layers.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/layers.R b/R/layers.R
index 2c89fdc..f834d64 100644
--- a/R/layers.R
+++ b/R/layers.R
@@ -207,7 +207,7 @@ checkmate_crs <- function(sf, crs = NULL) {
 
 standardise_crs <- function(out, crs = NULL) {
   if (checkmate::test_class(out, "list")) {
-    purrr::map(out, ~ checkmate_crs(.x, crs = crs))
+    purrr::map(out, checkmate_crs, crs = crs)
   } else {
     checkmate_crs(out, crs = crs)
   }