aboutsummaryrefslogtreecommitdiff
path: root/test/mastodon-http-tests.el
blob: d0f715e1b88f9bb58369da44ad851e19517b1781 (plain) (blame)
1
2
3
4
5
6
7
8
9
(require 'el-mock)

(ert-deftest mastodon-http:get:retrieves-endpoint ()
  "Should make a `url-retrieve' of the given URL."
  (let ((callback-double (lambda () "double")))
    (with-mock
      (mock (mastodon-http--url-retrieve-synchronously "https://foo.bar/baz"))
      (mock (mastodon-auth--access-token) => "test-token")
      (mastodon-http--get "https://foo.bar/baz"))))