diff options
Diffstat (limited to 'compat-tests.el')
| -rw-r--r-- | compat-tests.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/compat-tests.el b/compat-tests.el index 98c10d4..cad2b45 100644 --- a/compat-tests.el +++ b/compat-tests.el @@ -2263,6 +2263,12 @@ (goto-char (point-max)) (should-not (text-property-search-backward 'non-existant)))) +(ert-deftest color-dark-p () + (should (color-dark-p '(0 0 0))) + (should (color-dark-p '(0.5 0.5 0.5))) + (should-not (color-dark-p '(0.5 0.7 0.5))) + (should-not (color-dark-p '(1 1 1 )))) + (ert-deftest color-values-from-color-spec () ;; #RGB notation (should-equal '(0 0 0) (color-values-from-color-spec "#000")) |