Skip to content

Commit

Permalink
Update query_gn.R
Browse files Browse the repository at this point in the history
   I propose adding the line
 result[unlist(lapply(result, is.null))] = NA
because
 return(as.data.frame(result)) in list_datasets() will crash if one of the list elements is NULL so changing to NA
  • Loading branch information
ameliebaud authored Nov 17, 2021
1 parent 38d3433 commit 73e611e
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion R/query_gn.R
Original file line number Diff line number Diff line change
Expand Up @@ -12,7 +12,8 @@ query_gn <-
result <- httr::GET(url)
httr::stop_for_status(result)
result <- httr::content(result, encoding=encoding, as=output)

result[unlist(lapply(result, is.null))] = NA

check_gn_error(result)
}

Expand Down

0 comments on commit 73e611e

Please sign in to comment.