Council API discontinued

NEWS.md

@@ -1,3 +1,8 @@
+# eurlex 0.5.0
+
+## Major changes
+- the Council votes API was discontinued in May 2024. Hopefully there is a new one to replace it soon
+
 # eurlex 0.4.7
 
 ## Minor changes

R/elx_council_votes.R

@@ -90,29 +90,31 @@ elx_council_votes <- function(){
               ORDER BY DESC(?decisionDate), ?votingInstCode
 "
 
-    # run query
-    votes_resp <- graceful_http(
-      remote_file = "https://data.consilium.europa.eu/sparql",
-      body = list(query = query),
-      httr::content_type("multipart"),
-      headers = httr::add_headers('Accept' = 'text/csv'),
-      encode = "multipart",
-      verb = "POST"
-    )
-
-    # if var not created, break
-    if (is.null(votes_resp)){
-
-      return(invisible(NULL))
-
-    } 
-
-    # process response
-    votes <- votes_resp %>%
-      httr::content("text") %>%
-      readr::read_csv(col_types = readr::cols(.default = "c"))
-
-    # return
-    return(votes)
+    # # run query
+    # votes_resp <- graceful_http(
+    #   remote_file = "https://data.consilium.europa.eu/sparql",
+    #   body = list(query = query),
+    #   httr::content_type("multipart"),
+    #   headers = httr::add_headers('Accept' = 'text/csv'),
+    #   encode = "multipart",
+    #   verb = "POST"
+    # )
+    # 
+    # # if var not created, break
+    # if (is.null(votes_resp)){
+    #   
+    #   return(invisible(NULL))
+    #   
+    # } 
+    # 
+    # # process response
+    # votes <- votes_resp %>%
+    #   httr::content("text") %>%
+    #   readr::read_csv(col_types = readr::cols(.default = "c"))
+    # 
+    # # return
+    # return(votes)
+
+  return("The Council votes API was discontinued in May 2024.")
 
 }