From 1a68906d16a374345676f7a8ee8f271a655ae1b7 Mon Sep 17 00:00:00 2001
From: dylanbenzi <dylanbenzi@gmail.com>
Date: Sun, 20 Jul 2025 17:55:13 -0400
Subject: [PATCH] modify landfall point to use storm status color

---
 dashboard.Rmd | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/dashboard.Rmd b/dashboard.Rmd
index ff36684..ef7398b 100644
--- a/dashboard.Rmd
+++ b/dashboard.Rmd
@@ -462,8 +462,8 @@ output$track_map <- renderLeaflet({
         lat = ~lat,
         radius = 5,
         weight = 0,
-        color = "red",
-        fillColor = "red",
+        color = ~line_color,
+        fillColor = ~line_color,
         fillOpacity = 1,
         popup = ~paste0("<b>LANDFALL</b>", "<br>",
                         "<b>DATE</b>", "<br>",
@@ -484,8 +484,8 @@ output$track_map <- renderLeaflet({
         lat = ~lat,
         radius = ~rmw_meters,
         weight = 2,
-        color = "red",
-        fillColor = "red",
+        color = ~line_color,
+        fillColor = ~line_color,
         fillOpacity = 0.3,
         popup = ~paste0("<b>LANDFALL</b>", "<br>",
                         "<b>DATE</b>", "<br>",