diff options
Diffstat (limited to 'compat-tests.el')
| -rw-r--r-- | compat-tests.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/compat-tests.el b/compat-tests.el index 7aad543..3b95fbb 100644 --- a/compat-tests.el +++ b/compat-tests.el @@ -306,6 +306,10 @@ (should-equal (pos-bol 0) 1) (should-equal (pos-eol 0) 10))) +(ert-deftest imagep () + (should (imagep '(image :type xbm :file "file"))) + (should (imagep '(image :type xbm :data [1 2 3 4])))) + (ert-deftest image-property () (let ((image (list 'image))) ;; Add properties. |