From a647a1ffdde3e655396eb0093cd8ce073f30a842 Mon Sep 17 00:00:00 2001
From: unknown <ldecicco@usgs.gov>
Date: Mon, 1 Dec 2014 16:23:45 -0600
Subject: [PATCH] Took out url.exists.
---
R/constructNWISURL.r | 13 +++++++------
1 file changed, 7 insertions(+), 6 deletions(-)
diff --git a/R/constructNWISURL.r b/R/constructNWISURL.r
index 99fdde9a..0294adb8 100644
--- a/R/constructNWISURL.r
+++ b/R/constructNWISURL.r
@@ -203,12 +203,13 @@ constructNWISURL <- function(siteNumber,parameterCd="00060",startDate="",endDate
}
)
-
- if(url.exists(url)){
- return(url)
- } else {
- stop("The following url doesn't seem to exist:\n",url)
- }
+# This was waaay to slow:
+# if(url.exists(url)){
+# return(url)
+# } else {
+# stop("The following url doesn't seem to exist:\n",url)
+# }
+ return(url)
}
--
GitLab