From 73a09b89e57e8c33e462c14bde605f253120640f Mon Sep 17 00:00:00 2001
From: olivroy <52606734+olivroy@users.noreply.github.com>
Date: Fri, 15 Mar 2024 09:51:45 -0400
Subject: [PATCH] Fix partial match

---
 R/legend.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/legend.R b/R/legend.R
index c128e27..12dc335 100644
--- a/R/legend.R
+++ b/R/legend.R
@@ -1511,7 +1511,7 @@ makeGradient <- function(breaks, colors, height, width, id, fillOpacity,
   curvePercent <- ifelse(shape == 'stadium', '10%', '0')
   if (orientation == 'vertical') {
     htmltools::tagList(
-      htmltools::tags$def(
+      htmltools::tags$defs(
         htmltools::tags$linearGradient(
           id = id,
           x1 = 0, y1 = 0, x2 = 0, y2 = 1,
@@ -1528,7 +1528,7 @@ makeGradient <- function(breaks, colors, height, width, id, fillOpacity,
     )
   } else {
     htmltools::tagList(
-      htmltools::tags$def(
+      htmltools::tags$defs(
         htmltools::tags$linearGradient(
           id = id,
           x1 = 0, y1 = 0, x2 = 1, y2 = 0,