aboutsummaryrefslogtreecommitdiff
path: root/test/mastodon-auth-tests.el
diff options
context:
space:
mode:
Diffstat (limited to 'test/mastodon-auth-tests.el')
-rw-r--r--test/mastodon-auth-tests.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/test/mastodon-auth-tests.el b/test/mastodon-auth-tests.el
index e46f1a6..70c63d8 100644
--- a/test/mastodon-auth-tests.el
+++ b/test/mastodon-auth-tests.el
@@ -1,7 +1,7 @@
(require 'el-mock)
(ert-deftest generate-token ()
- ""
+ "Should make `mastdon-http--post' request to generate auth token."
(with-mock
(let ((mastodon-instance-url "https://instance.url"))
(mock (mastodon-client) => '(:client_id "id" :client_secret "secret"))
@@ -18,7 +18,7 @@
(mastodon-auth--generate-token))))
(ert-deftest get-token ()
- ""
+ "Should generate token and return JSON response."
(with-temp-buffer
(with-mock
(mock (mastodon-auth--generate-token) => (progn
@@ -27,12 +27,12 @@
(should (equal (mastodon-auth--get-token) '(:access_token "abcdefg"))))))
(ert-deftest access-token-1 ()
- ""
+ "Should return `mastodon-auth--token' if non-nil."
(let ((mastodon-auth--token "foobar"))
(should (string= (mastodon-auth--access-token) "foobar"))))
(ert-deftest access-token-2 ()
- ""
+ "Should set and return `mastodon-auth--token' if nil."
(let ((mastodon-auth--token nil))
(with-mock
(mock (mastodon-auth--get-token) => '(:access_token "foobaz"))