R/ReplaceText.R

Defines functions replaceBackWithForwardSlashAddin

Documented in replaceBackWithForwardSlashAddin

#' Replace "\" with "/".
#'
#' Call this function as an addin to replace backslashes \code{\\} with forward
#' slashes \code{/} in the selected text.
#'
#' @export
replaceBackWithForwardSlashAddin = function() {

  context <- rstudioapi::getActiveDocumentContext()

  for (sel in context$selection) {

    txt  <- sel$text

    newtxt <- gsub(pattern = "\\", replacement = "/", txt, fixed = TRUE)

    rstudioapi::modifyRange(sel$range, as.character(newtxt), context$id)

  }
}
pasturm/esaora documentation built on Dec. 1, 2018, 10:10 p.m.