R/utils.R

Defines functions rm_backslash

rm_backslash <- function(href) {
  href <- gsub("^\\/*(.*)", "\\1", href)
  href <- gsub("(.*)\\/$", "\\1", href)
  sprintf("/%s", href)
}
ColinFay/brochure documentation built on April 8, 2023, 3:42 p.m.