diff options
-rw-r--r-- | lisp/mastodon-http.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mastodon-http.el b/lisp/mastodon-http.el index 64f59ca..551d4fd 100644 --- a/lisp/mastodon-http.el +++ b/lisp/mastodon-http.el @@ -347,10 +347,10 @@ item uploaded, and `mastodon-toot--update-status-fields' is run." ;; because the '=' test below fails for them ;; they have the form (error . error message 24) ((not (proper-list-p error-thrown)) ; not dotted list - (message "Got error: %s. Shit went south." (cdr error-thrown))) + (message "Got error: %s. Shit went south." (cdr error-thrown))) ;; handle mastodon api errors ;; they have the form (error http 401) - ((= (car (last error-thrown)) 401) + ((= (car (last error-thrown)) 401) (message "Got error: %s Unauthorized: The access token is invalid" error-thrown)) ((= (car (last error-thrown)) 422) |