when checking for certified users, use the certified attribute, not p…

…assed
Sage-Bionetworks · Jul 30, 2024 · 51297f2 · 51297f2
1 parent 3ff9f67
commit 51297f2
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/R/synapse_rest_api.R b/R/synapse_rest_api.R
@@ -38,7 +38,8 @@ synapse_is_certified <- function(url="https://repo-prod.prod.sagebase.org/repo/v
   ownerid <- user_profile[["ownerId"]]
   url_req <- file.path(url, ownerid, endpoint)
   req <- httr::GET(url_req)
-  httr::content(req)[["passed"]]
+  resp <- httr::content(req)
+  resp[["certified"]]
 
 }
 

diff --git a/functions/synapse_rest_api.R b/functions/synapse_rest_api.R
@@ -38,7 +38,8 @@ synapse_is_certified <- function(url="https://repo-prod.prod.sagebase.org/repo/v
   ownerid <- user_profile[["ownerId"]]
   url_req <- file.path(url, ownerid, endpoint)
   req <- httr::GET(url_req)
-  httr::content(req)[["passed"]]
+  resp <- httr::content(req)
+  resp[["certified"]]
 
 }