From 826904348786512ba8c3b1c8f391c7320ce80bfc Mon Sep 17 00:00:00 2001
From: Ben Best <ben@ecoquants.com>
Date: Thu, 20 Jul 2023 10:23:46 +0200
Subject: [PATCH] =?UTF-8?q?=E2=88=86=20rerddap::griddap()=20arg=20`x`=20->?=
 =?UTF-8?q?=20`datasetx`?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 R/read.R               | 4 ++--
 vignettes/extractr.Rmd | 1 -
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/R/read.R b/R/read.R
index a544a07..830155d 100644
--- 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
index ca51de4..9488792 100644
--- 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)