update layer functions

eoda-dev · Jan 10, 2024 · dc4995e · dc4995e
1 parent f8fc330
commit dc4995e
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/R/layer.R b/R/layer.R
@@ -7,15 +7,17 @@
 #' @param layout
 #'
 #' @export
-layer <- function(type, id, source = NULL, paint = NULL, layout = NULL, ...) {
-  list(
+Layer <- function(type, id, source = NULL, paint = NULL, layout = NULL, ...) {
+  lay <- list(
     type = type,
     id = id,
     source = source,
     paint = paint,
     layout = layout
   ) |>
     purrr::compact()
+  class(lay) <- "MapLibreLayer"
+  return(lay)
 }