From b5a9d6cc970217a149cad474c2e4a80e1243617d Mon Sep 17 00:00:00 2001
From: Laura DeCicco <ldecicco@usgs.gov>
Date: Fri, 4 Dec 2015 10:36:46 -0600
Subject: [PATCH] Redundent code.
---
R/importWQP.R | 5 -----
1 file changed, 5 deletions(-)
diff --git a/R/importWQP.R b/R/importWQP.R
index 9153722a..ebff7ebd 100644
--- a/R/importWQP.R
+++ b/R/importWQP.R
@@ -62,11 +62,6 @@ importWQP <- function(obs_url, zip=FALSE, tz=""){
numToBeReturned <- as.numeric(headerInfo["Total-Result-Count"])
- if(headerInfo['Total-Result-Count'] == "0"){
- warning("No data returned")
- return(data.frame())
- }
-
if(is.na(numToBeReturned) | numToBeReturned == 0){
for(i in grep("Warning",names(headerInfo))){
warning(headerInfo[i])
--
GitLab