This commit is contained in:
Hong Ooi 2021-10-05 10:14:55 +11:00
Родитель 55a1e996ec
Коммит c2ca1b2843
1 изменённых файлов: 2 добавлений и 2 удалений

Просмотреть файл

@ -59,7 +59,7 @@ get_kusto_token <- function(server=NULL, clustername, location=NULL, tenant=NULL
if(is.null(auth_type) && app == .kusto_app_id && (!"username" %in% names(list(...))))
auth_type <- "device_code"
AzureAuth::get_azure_token(server, tenant, app, auth_type=auth_type, ...)
AzureAuth::get_azure_token(server, tenant, app, auth_type=auth_type, version=version, ...)
}
@ -90,7 +90,7 @@ delete_kusto_token <- function(server=NULL, clustername, location=NULL, tenant=N
if(is.null(auth_type) && app == .kusto_app_id && (!"username" %in% names(list(...))))
auth_type <- "device_code"
AzureAuth::delete_azure_token(server, tenant, app, auth_type=auth_type, confirm=confirm, ...)
AzureAuth::delete_azure_token(server, tenant, app, auth_type=auth_type, version=version, confirm=confirm, ...)
}