`fetch_token()`: check if there is already a token available

[dimfalk]

c.f.

# abort if token is not available
stopifnot("OAuth 2.0 token is missing. Run `fetch_token()` first." = file.exists(".httr-oauth"))