test print.cidlist()

natverse · Aug 24, 2024 · 6d02b22 · 6d02b22
1 parent 22c8d4a
commit 6d02b22
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/tests/testthat/test-ids.R b/tests/testthat/test-ids.R
@@ -30,11 +30,13 @@ test_that("key handling works", {
 
   expect_warning(cf_ids(hemibrain = 'rhubarb', expand = T))
 
-  expect_equal(c(
+  expect_equal(res <- c(
     cf_ids(hemibrain = '/MBON0[12].*', flywire=1:3),
     cf_ids(hemibrain = '612371421', flywire=3:5)),
     cf_ids(hemibrain = c("612371421", "673509195", "424789697", "5813022341"),
          flywire=as.character(1:5)))
+
+  expect_output(print(res), regexp = 'flywire.*hemibrain')
 })
 
 test_that("fanc/banc ids/metadata", {