R/graph_login.R

In Hong-Revo/AzureContainers: Interface to 'Container Instances', 'Docker Registry' and 'Kubernetes' in 'Azure'

graph_login <- function(tenant, ...)
{
    gr <- try(AzureGraph::get_graph_login(tenant=tenant), silent=TRUE)
    if(inherits(gr, "try-error"))
        gr <- AzureGraph::create_graph_login(tenant=tenant, ...)
    gr
}