diff options
author | Holger Dürer <me@hdurer.net> | 2021-11-09 21:06:04 +0100 |
---|---|---|
committer | Holger Dürer <me@hdurer.net> | 2021-11-10 20:34:06 +0100 |
commit | eb922191259721d6b1b232de41bbd43ebdb10d2f (patch) | |
tree | f348916cbbe0919ff08a6e076d151a69e31b7b0e /test | |
parent | 522926bcca0caf45516da3dcd00c944066641965 (diff) |
Make the local ert runner pass.
When just loading the lisp and test files one can run `M-x ert` but
because things are subtly different we need to tweak a few more things
to make things pass in that mode.
Diffstat (limited to 'test')
l--------- | test/fixture | 1 | ||||
-rw-r--r-- | test/mastodon-client-tests.el | 2 | ||||
-rw-r--r-- | test/mastodon-media-tests.el | 2 |
3 files changed, 4 insertions, 1 deletions
diff --git a/test/fixture b/test/fixture new file mode 120000 index 0000000..f418013 --- /dev/null +++ b/test/fixture @@ -0,0 +1 @@ +../fixture
\ No newline at end of file diff --git a/test/mastodon-client-tests.el b/test/mastodon-client-tests.el index b112729..9123286 100644 --- a/test/mastodon-client-tests.el +++ b/test/mastodon-client-tests.el @@ -36,7 +36,7 @@ (should (equal (mastodon-client--store) plist)))))) (ert-deftest mastodon-client--store-2 () - "Should store client in `mastodon-client--token-file'." + "Should store client in `mastodon-client--token-file'." (let* ((mastodon-instance-url "http://mastodon.example") (plstore (plstore-open "stubfile.plstore")) (client (cdr (plstore-get plstore "mastodon-http://mastodon.example")))) diff --git a/test/mastodon-media-tests.el b/test/mastodon-media-tests.el index 886c7b0..6168aaf 100644 --- a/test/mastodon-media-tests.el +++ b/test/mastodon-media-tests.el @@ -70,6 +70,7 @@ (let ((url "http://example.org/image.png")) (with-mock (mock (image-type-available-p 'imagemagick) => nil) + (mock (image-transforms-p) => nil) (mock (create-image * nil t) => '(image foo)) (mock (copy-marker 7) => :my-marker ) (mock (url-retrieve @@ -109,6 +110,7 @@ (let ((url "http://example.org/image.png")) (with-mock (mock (image-type-available-p 'imagemagick) => nil) + (mock (image-transforms-p) => nil) (mock (create-image * nil t) => '(image foo)) (mock (copy-marker 7) => :my-marker ) (mock (url-retrieve |