You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
13 lines
358 B
13 lines
358 B
context("basic functionality")
|
|
test_that("we can do something", {
|
|
|
|
tmp <- incant(list.files(system.file("img", package="wand"),
|
|
full.names=TRUE),
|
|
magic_wand_file())
|
|
tmp <- tmp$description
|
|
tmp <- unlist(tmp, use.names=FALSE)
|
|
tmp <- sort(tmp)
|
|
|
|
expect_that(any(substr(tmp, 1, 3) == "PNG"), equals(TRUE))
|
|
|
|
})
|
|
|