paginated_adlib_data_response <- function()

in R/ad_data.R [91:101]

• 11 lines of code
• 1 McCabe index (conditional complexity)

paginated_adlib_data_response <- function(responses) {
  last_response <- responses[[length(responses)]]
  structure(
    list(
      responses = responses,
      has_next = last_response$has_next,
      next_page = last_response$next_page
    ),
    class = "paginated_adlib_data_response"
  )
}