R/internal.R

In poissonconsulting/openinghours: Read and Write Strings of Opening Hours

empty_opening_hours <- function() {
  tibble::tibble(
    Open = hms::hms(integer(0)),
    Close = hms::hms(integer(0))
  )
}

empty_read <- function() {
  tibble::tibble(
    Name = character(0),
    String = character(0),
    OpeningHours = list()
  )
}