emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 8b7495a: ; * test/lisp/image-tests.el: fix previous commit


From: Mattias Engdegård
Subject: master 8b7495a: ; * test/lisp/image-tests.el: fix previous commit
Date: Thu, 6 May 2021 11:28:28 -0400 (EDT)

branch: master
commit 8b7495a722a57071cb2a978665f95f8227db2863
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>

    ; * 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 317e85f..aa86006 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."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]