add gcloud_account() to access token cache key

- closes #66
Bioconductor · Oct 5, 2022 · fc2d308 · fc2d308
1 parent 1f0b260
commit fc2d308
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/gcloud.R b/R/gcloud.R
@@ -37,7 +37,7 @@
             if (identical(Sys.getenv("USER"), "jupyter-user"))
                 "application-default"
 
-        key <- paste0(service, ":", app_default)
+        key <- paste0(service, ":", app_default, ":", gcloud_account())
         now <- Sys.time()
         if (is.null(tokens[[key]])) {
             tokens[[key]] <- .gcloud_access_token_new(app_default, now)