diff --git a/R/constructNWISURL.r b/R/constructNWISURL.r index 40235cd9c61a06cf9f23b98e0c713ff5be6088ab..75f9182878d45033b5c7b6d2646773e6626b1dce 100644 --- a/R/constructNWISURL.r +++ b/R/constructNWISURL.r @@ -138,7 +138,7 @@ constructNWISURL <- function(siteNumber,parameterCd,startDate,endDate,service,st url <- paste(url,"&startDT=",startDate,sep="") } else { startorgin <- "1851-01-01" - if ("uv" == service) startorgin <- "1900-01-01" + if ("iv" == service) startorgin <- "1900-01-01" url <- paste(url,"&startDT=",startorgin,sep="") }