R/open.R

In lorenzwalthert/precommit: Pre-Commit Hooks

#' Open pre-commit related files
#'
#' @details
#' * `open_config()`: opens the pre-commit config file.
#' * `open_wordlist()`: opens the the WORDLIST file for the check-spelling hook
#'   in inst/WORDLIST.
#' @inheritParams fallback_doc
#' @return
#' `NULL` (invisibly). The function is called for its side effects.
#' @family helpers
#' @examples
#' \dontrun{
#' open_config()
#' }
#' @export
open_config <- function(root = here::here()) {
  if (rstudioapi::isAvailable()) {
    rstudioapi::navigateToFile(fs::path(root, ".pre-commit-config.yaml"))
  } else {
    rlang::abort("Can't open if you don't have RStudio running.")
  }
  invisible(NULL)
}

#' @rdname open_config
#' @examples
#' \dontrun{
#' open_wordlist()
#' }
#' @export
open_wordlist <- function(root = here::here()) {
  rstudioapi::navigateToFile(fs::path(root, "inst", "WORDLIST"))
  invisible(NULL)
}