inst/scripts/test_auto_tweet.R

library(ser)
# if deauthorized on google drive:
# googledrive::drive_auth(use_oob = TRUE)
options(gargle_oob_default = TRUE)
options(gargle_oauth_email = gmail("ser.twitteracct"))

on_error_email_to(c(gmail("jason.gantenberg")))
safe_action_auto_tweet <- action_safely(action_auto_tweet, "(test_auto_tweet.R)")
safe_action_auto_tweet(twitter_token = sandbox_token())
SERTwitter/ser documentation built on June 27, 2022, 7:37 p.m.