R/utils.R

Defines functions print.account

#' @export
print.account <- function(x, ...){
  cat("Sauce Labs Account:\n")
  cat("SauceLabs username:",
      strsplit(x[["request"]]$options$userpwd, ":")[[1]][1], "\n")
}
johndharrison/RSauceLabs documentation built on May 19, 2019, 4:22 p.m.