tests/testthat/test-pathsanitize.R

context("test-pathsanitize")

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

test_that("path_sanitize works", {
  testthat::expect_identical(a, "73r78y23i_f_4_f04!!23{}_++_")
})
chasemc/IDBacApp documentation built on Oct. 22, 2022, 2:52 a.m.