aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/test-api.el8
1 files changed, 7 insertions, 1 deletions
diff --git a/test/test-api.el b/test/test-api.el
index 30590d7..f7f54c1 100644
--- a/test/test-api.el
+++ b/test/test-api.el
@@ -21,4 +21,10 @@
(should-error (sx-request-get-data "tags/emacs-does-not-exist"))
(let ((emacs-tags (length (sx-request-get-data 'tags/emacs))))
(should (> emacs-tags 450))
- (should (not (cl-remove-if #'stringp emacs-tags)))))
+ (should (not (cl-remove-if #'stringp emacs-tags))))
+ (should
+ ;; If image is not recognized, this returns nil.
+ (create-image (sx-request-get-url "https://raw.githubusercontent.com/vermiculus/sx.el/master/list-and-question.png")
+ 'imagemagick t
+ :width (min sx-question-mode-image-max-width
+ (window-body-width nil 'pixel)))))