tests/testthat/test-pathsanitize.R

context("test-pathsanitize")

a <- ghosts::path_sanitize("73r78y23i . ?f/.4_____f04!!23{}:>\"_++_")

test_that("path_sanitize works", {
  testthat::expect_identical(a, "73r78y23i_f_4_f04!!23{}_++_")
})
chasemc/ghosts documentation built on May 8, 2019, 12:50 a.m.