R/get_hcd_from_url.R

In gavinsimpson/canadaHCD: Canadian Historical Climate Data

##' @importFrom curl curl_download
get_hcd_from_url <- function(URL, ...) {
    tmp <- tempfile()
    f <- curl_download(URL, destfile = tmp)
    res <- capture_warnings(read_hcd(f, ...))
    df <- res$value
    attr(df, "warnings") <- res$warnings
    df
}