diff --git a/R/deprecatedFunctions.R b/R/deprecatedFunctions.R index 44922984666cdd98da731fc6b039812a9ed7a983..d19c35b580fa280298023c295e94642e35142cba 100644 --- a/R/deprecatedFunctions.R +++ b/R/deprecatedFunctions.R @@ -7,7 +7,7 @@ getNWISSites<- function(...){ #' @rdname whatNWISdata #' @export -getNWISDataAvailability <- function(siteNumber,service=c("uv","dv","qw")){ +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) }