aboutsummaryrefslogtreecommitdiff
path: root/test/mastodon-http-tests.el
blob: 03d4f9466bad2f07d96570bef298740a9b4bf9fa (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"))))