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 March 30, 2022, 5:02 a.m.