Duplicate endsWith arguments in is_web()

[adamhsparks]

I can't see a reason to have endsWith(x, ".html") two times in the is_web() on lines 67-69?

is_web <- function(x) {
  endsWith(x, ".php") || endsWith(x, ".html") || endsWith(x, ".html") || endsWith(x, ".htm")
}

[jonocarroll]

Oops, copypasta typo. I'm thinking that if the link to the data is just a web address (which many are) we could pass that to the browser.

The format checking can be improved, I just went with something that worked. There is a format column, but we can't guarantee it's populated.

This also doesn't cover the cases where the file extension isn't the last part of the URL. I want to think that some sort of filetype checker exists (similar to file on linux) which actually inspects the magic number after the file has been downloaded, but I don't know how cross-platform that would be.

Cheers for checking through - make any improvements you see fit.