Merge pull request #562 from rstudio/fix-dollar-equation

Replace '$' char w/ HTML entity
rstudio · Aug 12, 2024 · 5a00f4b · 5a00f4b
2 parents 59bb48e + 09cf71e
commit 5a00f4b
Showing 1 changed file with 11 additions and 8 deletions.
diff --git a/R/get_agent_report.R b/R/get_agent_report.R
@@ -1187,15 +1187,18 @@ get_agent_report <- function(
           NA_character_
 
         } else {
-          
+
           text <-
-            values_i %>%
-            tidy_gsub(
-              "~",
-              "<span style=\"color: purple;\">&marker;</span>"
-            ) %>%
-            unname()
-
+            unname(
+              tidy_gsub(
+                values_i,
+                "~",
+                "<span style=\"color: purple;\">&marker;</span>"
+              )
+            )
+
+          text <- gsub("$", "&dollar;", values_i, fixed = TRUE)
+
           text <- paste(text, collapse = ", ")
 
           if (size == "small") {