From fe86b3ddce1623b48507ceaf3aadf57a955ef2cf Mon Sep 17 00:00:00 2001 From: David Blodgett Date: Thu, 18 Jun 2020 08:21:50 -0500 Subject: [PATCH] another querystring fix --- R/reference_units.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/reference_units.R b/R/reference_units.R index 9655fa3..8a2012d 100644 --- a/R/reference_units.R +++ b/R/reference_units.R @@ -36,7 +36,7 @@ get_hu <- function(wbd_gdb, hu_layer, id_attribute, gnis_base, pid_base, creator = creator, description = description, c1_type = "QueryString", - c1_match = "?f=.*", + c1_match = "f=.*", c1_value = paste0(landing_base, hu$temp_id, "?f=${C:f:1}")) @@ -77,7 +77,7 @@ write_nat_aq <- function(nat_aq, pid_base, landing_base, out, out_csv) { creator = "dblodgett@usgs.gov", description = "National Aquifer Reference", c1_type = "QueryString", - c1_match = "?f=.*", + c1_match = "f=.*", c1_value = paste0(landing_base, nat_aq$NAT_AQFR_CD, "?f=${C:f:1}"))