Update test so don't get warning as well as error on mismatch

rladies · May 7, 2024 · dfd1b00 · dfd1b00
1 parent 5b319bc
commit dfd1b00
Showing 1 changed file with 4 additions and 6 deletions.
diff --git a/tests/testthat/test-get_event_attendees.R b/tests/testthat/test-get_event_attendees.R
@@ -1,13 +1,11 @@
-expected_names <- c("id", "name", "url", "photo", "organized_group_count")
-
 test_that("get_events_attendees() works with one status", {
+
+  expected_names <- c("id", "name", "url", "photo", "organized_group_count")
+
   vcr::use_cassette("get_event_attendees", {
     attendees <-  get_event_attendees(id = "103349942")
   })
   expect_s3_class(attendees, "data.frame")
 
-  expect_true(
-    all(
-      names(attendees) == expected_names
-    ))
+  expect_setequal(expected_names, names(attendees))
 })