tweaking ade_database_endpoint

This commit is contained in:
hong-revo 2018-12-28 18:35:14 +11:00
Родитель b2ce9cab09
Коммит 9288a6f4e8
2 изменённых файлов: 4 добавлений и 3 удалений

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

@ -2,6 +2,7 @@
S3method(ade_database_endpoint,ade_cluster_endpoint) S3method(ade_database_endpoint,ade_cluster_endpoint)
S3method(ade_database_endpoint,ade_database_resource) S3method(ade_database_endpoint,ade_database_resource)
S3method(ade_database_endpoint,character)
S3method(run_command,ade_cluster_endpoint) S3method(run_command,ade_cluster_endpoint)
S3method(run_command,ade_database_endpoint) S3method(run_command,ade_database_endpoint)
S3method(run_query,ade_database_endpoint) S3method(run_query,ade_database_endpoint)

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

@ -22,8 +22,8 @@ ade_database_endpoint.ade_database_resource <- function(object, ...)
#' @export #' @export
ade_database_endpoint.character <- function(object, database, tenant, ...) ade_database_endpoint.character <- function(object, cluster, location, tenant, ...)
{ {
clus <- ade_cluster_endpoint(object, tenant=tenant, ...) clus <- ade_cluster_endpoint(cluster=cluster, location=location, tenant=tenant, ...)
ade_database(clus, database=database) ade_database_endpoint(clus, object)
} }