blob: 00e1f41320b5069140d5a77b8d9415f685f1bf14 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
|
;;; mastodon-http-test.el --- Tests for mastodon-http.el -*- lexical-binding: nil -*-
(require 'el-mock)
(ert-deftest mastodon-http--get-retrieves-endpoint ()
"Should make a `url-retrieve' of the given URL."
(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")))
|