From 993fbec64edf128ba9e5a1aa61f93c385fe3be31 Mon Sep 17 00:00:00 2001 From: Johnson Denen Date: Sun, 23 Apr 2017 01:14:18 -0400 Subject: Clean up tests and update DOCSTRINGs --- test/mastodon-auth-tests.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'test/mastodon-auth-tests.el') 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")) -- cgit v1.2.3