diff --git a/R/getRawQWData.r b/R/getRawQWData.r
index b0e3b9cad17138a2998cc4d68a6a33855fd451df..ff4eb5859fbd2bc1593878288d0e24a3bfa0bc2b 100644
--- a/R/getRawQWData.r
+++ b/R/getRawQWData.r
@@ -21,7 +21,7 @@
 #' rawSampleSelect <- getRawQWData('05114000',c('00915','00931'), '1985-01-01', '1985-04-30')
 getRawQWData <- function(siteNumber,ParameterCd,StartDate,EndDate,interactive=TRUE){
 
-  url <- constructNWISURL(siteNumber,ParameterCd,StartDate,EndDate,"wqp")
+  url <- constructNWISURL(siteNumber,ParameterCd,StartDate,EndDate,"wqp",interactive=interactive)
 #   require(RCurl)
   h <- basicHeaderGatherer()
   doc <- getURI(url, headerfunction = h$update)