R/list_campaigns.R

In mark-brackenrig/campaignmonitoR: API wrapper for Campaign Monitor

list_campaigns <- function(client = Client()$ClientID,auth=Sys.getenv("CampMonauth")){
  url <- paste0('https://api.createsend.com/api/v3.2/clients/',client,'/campaigns','.json', collapse = ", ")
  
  raw.result = GET(url = url,authenticate(user = auth, password = ""))
  
  this.raw.content <- rawToChar(raw.result$content)
  
  this.content <- fromJSON(this.raw.content)
  
  return(as.data.frame(this.content))
}