data-raw/fns/close.R

close_open_sinks <- function() {
  purrr::walk(
    1:length(sink.number()),
    ~ sink(NULL)
  )
}
ready4-dev/ready4fun documentation built on April 22, 2024, 8:33 a.m.