From 57ff35ecdf89b451dedf293b4fdb326591ce3b73 Mon Sep 17 00:00:00 2001
From: unknown <ldecicco@usgs.gov>
Date: Mon, 3 Nov 2014 13:52:28 -0600
Subject: [PATCH] Converting gwl to waterml.
---
R/constructNWISURL.r | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/R/constructNWISURL.r b/R/constructNWISURL.r
index 7f4957d7..3866056d 100644
--- a/R/constructNWISURL.r
+++ b/R/constructNWISURL.r
@@ -150,7 +150,12 @@ constructNWISURL <- function(siteNumber,parameterCd,startDate="",endDate="",
rdb = "rdb,1.0",
tsv = "rdb,1.0",
wml2 = "waterml,2.0",
- wml1 = "waterml,1.1"
+ wml1 = {if ("gwlevels" == service) {
+ "waterml"
+ } else {
+ "waterml,1.1"
+ }
+ }
)
--
GitLab