Commit 2fc39d4b authored by Laura A DeCicco's avatar Laura A DeCicco
Browse files

Since it's a file now....

parent 4ce7ac1f
......@@ -44,7 +44,7 @@ getWebServiceData <- function(obs_url, ...){
returnedDoc <- returnedList
} else if (headerInfo$`content-type` %in% c("text/html",
"text/html; charset=UTF-8") ){
txt <- readBin(returnedList$content, character())
txt <- readLines(returnedList$content)
message(txt)
return(txt)
} else {
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment