From e7e36045a075502a94e7f2b521aba7475f0c8bc1 Mon Sep 17 00:00:00 2001
From: Jason Fisher <jfisher@usgs.gov>
Date: Thu, 16 Jan 2025 12:25:58 -0800
Subject: [PATCH] revert example
---
R/add_home_button.R | 7 -------
man/add_home_button.Rd | 7 -------
2 files changed, 14 deletions(-)
diff --git a/R/add_home_button.R b/R/add_home_button.R
index 4d57ba9..33fdfa0 100644
--- a/R/add_home_button.R
+++ b/R/add_home_button.R
@@ -25,13 +25,6 @@
#' @examples
#' extent <- c(-124.409, -114.131, 32.534, 42.009) # California
#' make_map(maps = "Topo") |>
-#' leaflet::addRectangles(
-#' lng1 = extent[1],
-#' lat1 = extent[3],
-#' lng2 = extent[2],
-#' lat2 = extent[4],
-#' fill = FALSE
-#' ) |>
#' add_home_button(extent = extent)
add_home_button <- function(map,
diff --git a/man/add_home_button.Rd b/man/add_home_button.Rd
index a9e80cf..35f739f 100644
--- a/man/add_home_button.Rd
+++ b/man/add_home_button.Rd
@@ -30,13 +30,6 @@ Add a button to a \href{https://leafletjs.com/}{Leaflet} map that zooms to the p
\examples{
extent <- c(-124.409, -114.131, 32.534, 42.009) # California
make_map(maps = "Topo") |>
- leaflet::addRectangles(
- lng1 = extent[1],
- lat1 = extent[3],
- lng2 = extent[2],
- lat2 = extent[4],
- fill = FALSE
- ) |>
add_home_button(extent = extent)
}
\seealso{
--
GitLab