gcloud_account can switch the account?

[shbrief]

I'm a little confused with the behavior of the gcloud_account function - whether it can change the Google account login for the session. I want to change/setup Google cloud account within one session and it seems like gcloud_account does it partially(?).

> gcloud_account("shbrief@gmail.com")
[1] "shbrief@gmail.com"
> gsutil_ls("gs://sh_misc/")
[1] "gs://sh_misc/startup_message.sh" "gs://sh_misc/work/"             
> x <- avworkspaces()
> x[x$accessLevel == "PROJECT_OWNER", 1:3]
# A tibble: 3 × 5
  name                      lastModified createdBy                namespace                accessLevel  
  <chr>                     <date>       <chr>                    <chr>                    <chr>        
1 AnVIL_GTEx_V8_hg38 copy   2022-04-07   shbrief@gmail.com        waldronlab-terra-rstudio PROJECT_OWNER
2 AnVIL_GTEx_V9_hg38 copy   2022-04-07   shbrief@gmail.com        waldronlab-terra-rstudio PROJECT_OWNER
3 AVP-test                  2021-07-09   shbrief@gmail.com        waldronlab-terra         PROJECT_OWNER

When I provide a different account to gcloud_account, it changes my access to the cloud bucket. But it still thinks I'm the project owner of the other account.

> gcloud_account("bioc.terra@gmail.com")
[1] "bioc.terra@gmail.com"
> gsutil_ls("gs://sh_misc/")
[1] "gs://sh_misc/startup_message.sh" "gs://sh_misc/work/"             
Warning message:
'gsutil_requesterpays()' returned an error:
  'gsutil -u bioinfo requesterpays get gs://sh_misc' failed:
  AccessDeniedException: 403 bioc.terra@gmail.com does not have serviceusage.services.use access to the Google Cloud project.
  exit status: 1 
> y <- avworkspaces()
> y[y$accessLevel == "PROJECT_OWNER", 1:3]
# A tibble: 3 × 5
  name                      lastModified createdBy                namespace                accessLevel  
  <chr>                     <date>       <chr>                    <chr>                    <chr>        
1 AnVIL_GTEx_V8_hg38 copy   2022-04-07   shbrief@gmail.com        waldronlab-terra-rstudio PROJECT_OWNER
2 AnVIL_GTEx_V9_hg38 copy   2022-04-07   shbrief@gmail.com        waldronlab-terra-rstudio PROJECT_OWNER
3 AVP-test                  2021-07-09   shbrief@gmail.com        waldronlab-terra         PROJECT_OWNER