如何在blastula安装誓言覆盖后重新建立原始的OAuth

Question

我成功地使用gmailr配置了oauth，下面的代码工作正常

require(gmailr)

gm_auth_configure(path="E:/SOME_NAME.json")

test_email <- mime(
To = "someone@something.com",
From = "someone@gmail.com",
Subject = "this is just a gmailr test",
body = "Can you hear me now?")
gm_send_message(test_email)

然后，我安装了blastula，并将gmail oauth重新配置为：

create_email_creds_file(
user = "someone@gmail.com",
password = "************",
provider = "gmail")

现在当我跑：

require(gmailr)
gm_auth_configure(path="E:/SOME_NAME.json")
test_email <- mime(
To = "someone@somewhere.com",
From = "someone@gmail.com",
Subject = "this is just a gmailr test",
body = "Can you hear me now?")
gm_send_message(test_email)

我得到了错误：

自动刷新陈旧的OAuth令牌。gzfile中的错误(文件，模式)：无法打开连接:警告消息: 1:无法刷新令牌: invalid_grant令牌已过期或被撤销。2:在gzfile(文件，模式)：无法打开文件'C:/Users/.R/gargle/gargle-oauth'：它是一个目录

如何撤消blastula并返回到我最初工作的gmailr文件/即如何重新开始并让gm_auth_configure指向我的oauth文件的位置？

Answer 1

我发现了如何重新设置到原始的宣誓文件，gm_auth(cache=".secret")起了作用。这现在带你回到谷歌页面，链接回原来的oauth文件，之后一切都好起来了。所以完整的代码是：

gm_auth_configure(path="E:/SOME_NAME.json")
gm_auth(cache=".secret")

test_email <- mime(
To = "someone@something.com",
From = "someone@gmail.com",
Subject = "this is just a gmailr test",
body = "Can you hear me now?")
gm_send_message(test_email)

这现在恢复到原来的宣誓文件，所有的工作再次完美。