From efa2e1aa9c0ed1ea7ca0ac67e39466c61490743a Mon Sep 17 00:00:00 2001
From: unknown <ldecicco@usgs.gov>
Date: Tue, 4 Nov 2014 13:51:01 -0600
Subject: [PATCH] Fixed bug.

---
 R/whatNWISsites.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/whatNWISsites.R b/R/whatNWISsites.R
index 1b392f2e..fbc26a32 100644
--- a/R/whatNWISsites.R
+++ b/R/whatNWISsites.R
@@ -24,7 +24,7 @@ whatNWISsites <- function(...){
   urlCall <- paste(baseURL,
                    urlCall,sep = "")
   
-  if(url.exists(urlSitefile)){
+  if(url.exists(urlCall)){
     h <- basicHeaderGatherer()
     doc = tryCatch({
       returnedDoc <- getURI(urlCall, headerfunction = h$update)
-- 
GitLab