diff options
| author | Daniel Mendler <mail@daniel-mendler.de> | 2023-01-21 11:39:06 +0100 |
|---|---|---|
| committer | Daniel Mendler <mail@daniel-mendler.de> | 2023-01-21 11:39:06 +0100 |
| commit | aa2e6e7c7ce43a46b010c2e1198ddf31b2dbe382 (patch) | |
| tree | 5617eaaac6c6cf50cb6c1a8cad3ad80707743520 /compat-tests.el | |
| parent | 7321d20be7a4ac2f214f149419314c075c239ec8 (diff) | |
imagep prototypefeature/imagep
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. |