∆ rerddap::griddap() arg x -> datasetx

marinebon · Jul 20, 2023 · 8269043 · 8269043
1 parent a29fa4f
commit 8269043
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 3 deletions.
diff --git a/R/read.R b/R/read.R
@@ -312,7 +312,7 @@ get_ed_grds <- function(
       message(glue("  griddap({date}, ...)"))
 
     nc <- try(griddap(
-      attr(ed_info, "datasetid"),
+      datasetx  = attr(ed_info, "datasetid"),
       fields    = ed_var,
       url       = ed_info$base_url,
       longitude = c(bb["xmin"], bb["xmax"]),
@@ -324,7 +324,7 @@ get_ed_grds <- function(
       stop(glue("
         Problem fetching data from ERDDAP server using:
           rerddap::griddap(
-            x         = '{attr(ed_info, 'datasetid')}',
+            datasetx  = '{attr(ed_info, 'datasetid')}',
             fields    = '{ed_var}',
             url       = '{ed_info$base_url}',
             longitude = c({bb['xmin']}, {bb['xmax']}),

diff --git a/vignettes/extractr.Rmd b/vignettes/extractr.Rmd
@@ -26,7 +26,6 @@ devtools::load_all()
 ```{r}
 if (!require("librarian"))
   install.packages("librarian")
-library(librarian)
 
 librarian::shelf(
   dplyr, here, mapview, sf)