Merge pull request #197 from ldecicco-USGS/master

Bug fix
DOI-USGS · Mar 18, 2016 · 8c8314f · 8c8314f
2 parents 5211c43 + 8a4f6f4
commit 8c8314f
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 6 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: dataRetrieval
 Type: Package
 Title: Retrieval Functions for USGS and EPA Hydrologic and Water Quality Data
-Version: 2.5.2
+Version: 2.5.3
 Date: 2016-03-04
 Authors@R: c( person("Robert", "Hirsch", role = c("aut"),
     email = "rhirsch@usgs.gov"),
@@ -28,10 +28,10 @@ Depends:
     R (>= 3.0)
 Imports:
     XML,
-    httr,
+    httr (>= 1.0.0),
     curl,
     reshape2,
-    lubridate,
+    lubridate (>= 1.5.0),
     stats,
     utils,
     dplyr,

diff --git a/R/whatNWISsites.R b/R/whatNWISsites.R
@@ -46,9 +46,7 @@ whatNWISsites <- function(...){
 
   rawData <- getWebServiceData(urlCall, encoding='gzip')
 
-
-  doc <- xmlTreeParse(rawData, getDTD = FALSE, useInternalNodes = TRUE)
-  doc <- xmlRoot(doc)
+  doc <- xmlRoot(rawData)
   numChunks <- xmlSize(doc)
   for(i in 1:numChunks){
     chunk <- doc[[1]]