From 5b319bc7e80e8f9f013f3f467a824abdb98e14a3 Mon Sep 17 00:00:00 2001 From: Nic Crane Date: Tue, 7 May 2024 11:34:01 +0100 Subject: [PATCH 1/2] Remove timezone field from the eventAttendee query --- inst/graphql/find_attendees.graphql | 1 - 1 file changed, 1 deletion(-) diff --git a/inst/graphql/find_attendees.graphql b/inst/graphql/find_attendees.graphql index ad73adf3..3081d281 100644 --- a/inst/graphql/find_attendees.graphql +++ b/inst/graphql/find_attendees.graphql @@ -26,7 +26,6 @@ query eventAttendee( baseUrl } joinTime - timezone organizedGroupCount << extra_graphql >> } From dfd1b00b81ca4b468d7b7584ac81fbcafd59ddec Mon Sep 17 00:00:00 2001 From: Nic Crane Date: Tue, 7 May 2024 11:34:23 +0100 Subject: [PATCH 2/2] Update test so don't get warning as well as error on mismatch --- tests/testthat/test-get_event_attendees.R | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/tests/testthat/test-get_event_attendees.R b/tests/testthat/test-get_event_attendees.R index 57e36233..f9bb1112 100644 --- 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)) })