Added gzip encoding, NWIS stuff seems much snappier!

DESCRIPTION

 Package: dataRetrieval
 Type: Package
 Title: Retrieval Functions for USGS and EPA Hydrologic and Water Quality Data
-Version: 2.1.1
+Version: 2.1.2
 Date: 2015-02-01
 Authors@R: c( person("Robert", "Hirsch", role = c("aut"),
     email = "rhirsch@usgs.gov"),

R/getWebServiceData.R

@@ -20,7 +20,7 @@
 getWebServiceData <- function(obs_url){
   possibleError <- tryCatch({
     h <- basicHeaderGatherer()
-    returnedDoc <- getURI(obs_url, headerfunction = h$update)      
+    returnedDoc <- getURI(obs_url, headerfunction = h$update, encoding='gzip')      
   }, warning = function(w) {
     warning(w, "with url:", obs_url)
   }, error = function(e) {