R/zzz.R

Defines functions close_conns c_get

close_conns <- function() {
  cons <- showConnections()
  ours <- as.integer(rownames(cons)[grepl("/geojsonlint|\\.geojson",
    cons[, "description"])])
  for (i in ours) {
    close(getConnection(i))
  }
}

c_get <- function(url, args = list(), ...) {
  conn <- crul::HttpClient$new(url, opts = list(...))
  res <- conn$get(query = args)
  res$raise_for_status()
  res
}

Try the geojsonlint package in your browser

Any scripts or data that you put into this service are public.

geojsonlint documentation built on Feb. 13, 2020, 9:06 a.m.