From 8d92f4cd11561a76b3a524a87922b1b24a4accc0 Mon Sep 17 00:00:00 2001
From: Laura DeCicco <ldecicco@usgs.gov>
Date: Wed, 25 Nov 2015 13:27:23 -0600
Subject: [PATCH] Catching some test bugs.
---
DESCRIPTION | 2 +-
NAMESPACE | 1 +
R/importRDB1.r | 2 ++
R/readNWISdata.r | 5 -----
4 files changed, 4 insertions(+), 6 deletions(-)
diff --git a/DESCRIPTION b/DESCRIPTION
index 2a9a3222..f3790bce 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -2,7 +2,7 @@ Package: dataRetrieval
Type: Package
Title: Retrieval Functions for USGS and EPA Hydrologic and Water Quality Data
Version: 2.4.0
-Date: 2015-10-14
+Date: 2015-11-25
Authors@R: c( person("Robert", "Hirsch", role = c("aut"),
email = "rhirsch@usgs.gov"),
person("Laura", "DeCicco", role = c("aut","cre"),
diff --git a/NAMESPACE b/NAMESPACE
index f5888a0b..ea565e36 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -45,5 +45,6 @@ importFrom(plyr,rbind.fill.matrix)
importFrom(readr,col_character)
importFrom(readr,cols)
importFrom(readr,read_delim)
+importFrom(readr,read_lines)
importFrom(reshape2,dcast)
importFrom(reshape2,melt)
diff --git a/R/importRDB1.r b/R/importRDB1.r
index 0d00de16..6b990931 100644
--- a/R/importRDB1.r
+++ b/R/importRDB1.r
@@ -45,6 +45,8 @@
#' @import utils
#' @import stats
#' @importFrom dplyr left_join
+#' @importFrom readr read_lines
+#' @importFrom readr read_delim
#' @examples
#' siteNumber <- "02177000"
#' startDate <- "2012-09-01"
diff --git a/R/readNWISdata.r b/R/readNWISdata.r
index aadee1f4..995fef0b 100644
--- a/R/readNWISdata.r
+++ b/R/readNWISdata.r
@@ -202,11 +202,6 @@ readNWISdata <- function(service="dv", ...){
retval$tz_cd <- rep(tz, nrow(retval))
}
}
-
- if("qwdata" == service){
- retval <- convertQWdates(retval)
- }
-
}
return(retval)
--
GitLab