From 8f2c83170f8523432a3c8044d4bf85c46bfe9dd1 Mon Sep 17 00:00:00 2001
From: fawda123 <mbafs2012@gmail.com>
Date: Mon, 28 Oct 2024 15:54:09 -0400
Subject: [PATCH] show_enteromap has station as layerId for markers

---
 R/show_enteromap.R | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/R/show_enteromap.R b/R/show_enteromap.R
index bb0e32e3..473305e1 100644
--- a/R/show_enteromap.R
+++ b/R/show_enteromap.R
@@ -66,7 +66,8 @@ show_enteromap <- function(fibdata, yrsel, mosel, areasel = NULL, wetdry = FALSE
       lng = ~Longitude,
       lat = ~Latitude,
       icon = ~icons[as.numeric(grp)],
-      label = ~lapply(as.list(lab), util_html)
+      label = ~lapply(as.list(lab), util_html),
+      layerId = ~station
     )
 
   # add appropriate legends