test_fixtures <- list() test_fixtures$empty_gql_response <- list( "data" = list( "group" = list( "projects" = list( "count" = 0, "pageInfo" = list( "hasNextPage" = FALSE, "endCursor" = NULL ), "edges" = list() ) ) ) ) test_fixtures$half_empty_gql_response <- list( "data" = list( "group" = list( "projects" = list( "count" = 445, "pageInfo" = list( "hasNextPage" = TRUE, "endCursor" = NULL ), "edges" = list() ) ) ) )