From 8b7495a722a57071cb2a978665f95f8227db2863 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Thu, 6 May 2021 17:23:44 +0200 Subject: [PATCH] ; * test/lisp/image-tests.el: fix previous commit --- test/lisp/image-tests.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/test/lisp/image-tests.el b/test/lisp/image-tests.el index 317e85fe50c..aa8600609c4 100644 --- a/test/lisp/image-tests.el +++ b/test/lisp/image-tests.el @@ -57,11 +57,10 @@ (should (eq (image-type-from-file-name "foo.png") 'png))) (ert-deftest image-type/from-filename () - ;; On emba, `image-load-path' does not exist. - (skip-unless (bound-and-true-p image-load-path)) - (should (eq (image-type "gif.pbm") 'pbm)) - (when (memq 'jpeg image-types) ; jpeg may not be compiled in - (should (eq (image-type "foo.jpg") 'jpeg)))) + ;; On emba, `image-types' and `image-load-path' do not exist. + (skip-unless (and (bound-and-true-p image-types) + (bound-and-true-p image-load-path))) + (should (eq (image-type "foo.jpg") 'jpeg))) (ert-deftest image-type-from-file-header-test () "Test image-type-from-file-header." -- 2.39.2