From da0e56cbe7afa2e16b7446d4fc1361939ad279e9 Mon Sep 17 00:00:00 2001
From: unknown <ldecicco@usgs.gov>
Date: Thu, 13 Nov 2014 09:31:54 -0600
Subject: [PATCH] Fixed a couple bugs.
---
R/deprecatedFunctions.R | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/R/deprecatedFunctions.R b/R/deprecatedFunctions.R
index d19c35b5..61167e18 100644
--- a/R/deprecatedFunctions.R
+++ b/R/deprecatedFunctions.R
@@ -9,7 +9,7 @@ getNWISSites<- function(...){
#' @export
getNWISDataAvailability <- function(siteNumbers,service=c("uv","dv","qw")){
message("This function is being deprecated. Please use whatNWISdata in the future.")
- whatNWISdata(siteNumber=siteNumber, service=service)
+ whatNWISdata(siteNumbers, service=service)
}
@@ -52,7 +52,7 @@ getNWISdvData<- function(siteNumber,parameterCd,startDate="",endDate="",statCd="
#' @export
getNWISunitData<- function(siteNumbers,parameterCd,startDate="",endDate="", tz=""){
message("This function is being deprecated. Please use readNWISuv in the future.")
- readNWISuv(siteNumber,parameterCd,startDate,endDate, tz)
+ readNWISuv(siteNumbers,parameterCd,startDate,endDate, tz)
}
#' @rdname readNWISqw
--
GitLab