From 0067641239df75e049c5860bbf65b0af834624bc Mon Sep 17 00:00:00 2001
From: kemihak <kamel.kemiha@rte-france.com>
Date: Thu, 14 Nov 2024 15:51:30 +0100
Subject: [PATCH] Remove additional attributes in link part to match the legacy
 ones

---
 R/importOutput.R | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/R/importOutput.R b/R/importOutput.R
index 6d41e83e..38612ff4 100644
--- a/R/importOutput.R
+++ b/R/importOutput.R
@@ -985,9 +985,10 @@
   }
   
   endpoint <- paste0(endpoint_root, frequency_url, columns_url, links_url, mc_years_url)
-  res <- api_get(opts = opts,
-            endpoint = endpoint,
-            default_endpoint = "v1/studies")
+  res <- api_get(opts = opts, endpoint = endpoint, default_endpoint = "v1/studies")
+  
+  attr(res, "spec") <- NULL
+  attr(res, "problems") <- NULL
   
   return(as.data.table(res))
 }