Fix link to grob docs

willgearty · Oct 25, 2024 · d5c5e1a · d5c5e1a
1 parent 2290522
commit d5c5e1a
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 3 deletions.
diff --git a/R/patterns.R b/R/patterns.R
@@ -32,7 +32,7 @@
 #' @param alpha The transparency to use for the fill of the pattern.
 #' @param bg The background color to use for the pattern.
 #'
-#' @return `geo_grob()` returns a [grob][grid::grid.grob] object with a single
+#' @return `geo_grob()` returns a \link[grid:gTree]{grob} object with a single
 #'   instance of the desired pattern. `geo_pattern()` returns a
 #'   [GridPattern][grid::patterns] object with a repeated instance of the
 #'   desired pattern.
@@ -74,6 +74,7 @@ geo_pattern <- function(code, scale = 2,
 #' @importFrom grid editGrob rectGrob gList gTree gPath gpar
 geo_grob <- function(code,
                      col = NULL, fill = NULL, alpha = NULL, bg = "white") {
+  geo_grobs <- getExportedValue("deeptimedata", "geo_grobs")
   code <- as.character(code)
   # get the grob for the given code
   code <- gsub("(-.*)?", "", code)

diff --git a/man/geo_pattern.Rd b/man/geo_pattern.Rd
diff --git a/man/get_scale_data.Rd b/man/get_scale_data.Rd