tests/testthat/test-keep_values.R

In vvshiny: Create Complex Shiny Apps More Easily

test_that("keep_values works as expected", {
  input = c("A;var1", "B;var1", "C;var1")
  values = keep_values(input)

  # Check if the values are correctly extracted
  expect_equal(values, list("A", "B", "C"))
})