summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorDmitry Gutov <dgutov@yandex.ru>2019-12-10 02:15:55 +0200
committerDmitry Gutov <dgutov@yandex.ru>2019-12-10 02:16:44 +0200
commitac1b6e97b6a6a87e5f36b0f002b4a2d77381e628 (patch)
treecd50365e77055ef81a643393f834e8232a505029 /test
parent58fb4c3e68a4a42ad491d0fa2c084e5c39942e2b (diff)
downloademacs-ac1b6e97b6a6a87e5f36b0f002b4a2d77381e628.tar.gz
Rename faces used in faces-tests.el
* test/data/themes/faces-test-light-theme.el: * test/data/themes/faces-test-dark-theme.el: Update accordingly. * test/lisp/faces-tests.el (faces--test-extend-with-themes): Don't use the diff-mode faces. Rename the definitions.
Diffstat (limited to 'test')
-rw-r--r--test/data/themes/faces-test-dark-theme.el6
-rw-r--r--test/data/themes/faces-test-light-theme.el4
-rw-r--r--test/lisp/faces-tests.el70
3 files changed, 39 insertions, 41 deletions
diff --git a/test/data/themes/faces-test-dark-theme.el b/test/data/themes/faces-test-dark-theme.el
index 2c114069f9c..f5e41ccdaf9 100644
--- a/test/data/themes/faces-test-dark-theme.el
+++ b/test/data/themes/faces-test-dark-theme.el
@@ -24,9 +24,9 @@
(custom-theme-set-faces
'faces-test-dark
- '(diff-added ((t (:foreground "Green" :extend t))))
- '(diff-changed-face ((t (:foreground "Khaki"))))
- '(diff-file-header-face ((t (:background "grey20" :foreground "ivory1")))))
+ '(spiff-added ((t (:foreground "Green" :extend t))))
+ '(spiff-changed-face ((t (:foreground "Khaki"))))
+ '(spiff-file-header-face ((t (:background "grey20" :foreground "ivory1")))))
(provide-theme 'faces-test-dark)
diff --git a/test/data/themes/faces-test-light-theme.el b/test/data/themes/faces-test-light-theme.el
index fc22d47cf8d..cab4f4130b7 100644
--- a/test/data/themes/faces-test-light-theme.el
+++ b/test/data/themes/faces-test-light-theme.el
@@ -24,8 +24,8 @@
(custom-theme-set-faces
'faces-test-light
- '(diff-added ((t (:inherit diff-changed :background "light green" :extend t))))
- '(diff-changed ((t (:background "light steel blue")))))
+ '(spiff-added ((t (:inherit diff-changed :background "light green" :extend t))))
+ '(spiff-changed ((t (:background "light steel blue")))))
(provide-theme 'faces-test-light)
diff --git a/test/lisp/faces-tests.el b/test/lisp/faces-tests.el
index eb8c533b8e6..90604b1269e 100644
--- a/test/lisp/faces-tests.el
+++ b/test/lisp/faces-tests.el
@@ -108,20 +108,18 @@
)
(ert-deftest faces--test-extend-with-themes ()
- ;; Make sure the diff-mode faces are not defined.
- (should-not (featurep 'diff-mode))
- (defface diff-changed-face
+ (defface spiff-changed-face
'((t :extend t :weight bold))
"")
- (defface diff-added
+ (defface spiff-added
'((t :background "grey"))
"")
- (defface diff-file-header-face
+ (defface spiff-file-header-face
'((t :extend nil :foreground "cyan"))
"")
- (should (equal (face-attribute 'diff-changed-face :extend) t))
- (should (equal (face-attribute 'diff-added :extend) 'unspecified))
- (should (equal (face-attribute 'diff-file-header-face :extend) nil))
+ (should (equal (face-attribute 'spiff-changed-face :extend) t))
+ (should (equal (face-attribute 'spiff-added :extend) 'unspecified))
+ (should (equal (face-attribute 'spiff-file-header-face :extend) nil))
(add-to-list 'custom-theme-load-path (concat faces--test-data-dir "themes"))
(load-theme 'faces-test-dark t t)
(load-theme 'faces-test-light t t)
@@ -132,9 +130,9 @@
'unspecified))
(should (equal (face-attribute 'faces--test-inherit-no-extend :extend nil t)
nil))
- (should (equal (face-attribute 'diff-changed-face :extend) t))
- (should (equal (face-attribute 'diff-added :extend) 'unspecified))
- (should (equal (face-attribute 'diff-file-header-face :extend) nil))
+ (should (equal (face-attribute 'spiff-changed-face :extend) t))
+ (should (equal (face-attribute 'spiff-added :extend) 'unspecified))
+ (should (equal (face-attribute 'spiff-file-header-face :extend) nil))
(enable-theme 'faces-test-dark)
(should (equal (face-attribute 'faces--test-inherit-extend :extend)
'unspecified))
@@ -143,11 +141,11 @@
'unspecified))
(should (equal (face-attribute 'faces--test-inherit-no-extend :extend nil t)
nil))
- (should (equal (face-attribute 'diff-changed-face :extend) t))
- (should (equal (face-attribute 'diff-added :extend) t))
- (should (equal (face-attribute 'diff-file-header-face :extend) nil))
+ (should (equal (face-attribute 'spiff-changed-face :extend) t))
+ (should (equal (face-attribute 'spiff-added :extend) t))
+ (should (equal (face-attribute 'spiff-file-header-face :extend) nil))
(defface faces--test-face3
- '((t :inherit diff-added :weight bold))
+ '((t :inherit spiff-added :weight bold))
"")
(should (equal (face-attribute 'faces--test-face3 :extend nil t) t))
(disable-theme 'faces-test-dark)
@@ -158,11 +156,11 @@
'unspecified))
(should (equal (face-attribute 'faces--test-inherit-no-extend :extend nil t)
nil))
- (should (equal (face-attribute 'diff-changed-face :extend) t))
- (should (equal (face-attribute 'diff-added :extend) 'unspecified))
- (should (equal (face-attribute 'diff-file-header-face :extend) nil))
+ (should (equal (face-attribute 'spiff-changed-face :extend) t))
+ (should (equal (face-attribute 'spiff-added :extend) 'unspecified))
+ (should (equal (face-attribute 'spiff-file-header-face :extend) nil))
(should (equal (face-attribute 'faces--test-face3 :extend nil t) 'unspecified))
- (defface diff-indicator-changed
+ (defface spiff-indicator-changed
'((t (:weight bold :extend t)))
"")
(enable-theme 'faces-test-light)
@@ -173,10 +171,10 @@
'unspecified))
(should (equal (face-attribute 'faces--test-inherit-no-extend :extend nil t)
nil))
- (should (equal (face-attribute 'diff-changed-face :extend) t))
- (should (equal (face-attribute 'diff-added :extend) t))
- (should (equal (face-attribute 'diff-file-header-face :extend) nil))
- (should (equal (face-attribute 'diff-indicator-changed :extend) t))
+ (should (equal (face-attribute 'spiff-changed-face :extend) t))
+ (should (equal (face-attribute 'spiff-added :extend) t))
+ (should (equal (face-attribute 'spiff-file-header-face :extend) nil))
+ (should (equal (face-attribute 'spiff-indicator-changed :extend) t))
(should (equal (face-attribute 'faces--test-face3 :extend nil t) t))
(frame-set-background-mode (selected-frame) 'dark)
(should (equal (face-attribute 'faces--test-inherit-extend :extend)
@@ -186,10 +184,10 @@
'unspecified))
(should (equal (face-attribute 'faces--test-inherit-no-extend :extend nil t)
nil))
- (should (equal (face-attribute 'diff-changed-face :extend) t))
- (should (equal (face-attribute 'diff-added :extend) t))
- (should (equal (face-attribute 'diff-file-header-face :extend) nil))
- (should (equal (face-attribute 'diff-indicator-changed :extend) t))
+ (should (equal (face-attribute 'spiff-changed-face :extend) t))
+ (should (equal (face-attribute 'spiff-added :extend) t))
+ (should (equal (face-attribute 'spiff-file-header-face :extend) nil))
+ (should (equal (face-attribute 'spiff-indicator-changed :extend) t))
(should (equal (face-attribute 'faces--test-face3 :extend nil t) t))
(or noninteractive
(let ((fr (make-frame)))
@@ -203,21 +201,21 @@
(should (equal (face-attribute 'faces--test-inherit-no-extend
:extend fr t)
nil))
- (should (equal (face-attribute 'diff-changed-face :extend fr) t))
- (should (equal (face-attribute 'diff-added :extend fr) t))
- (should (equal (face-attribute 'diff-file-header-face :extend fr) nil))
- (should (equal (face-attribute 'diff-indicator-changed :extend fr) t))
+ (should (equal (face-attribute 'spiff-changed-face :extend fr) t))
+ (should (equal (face-attribute 'spiff-added :extend fr) t))
+ (should (equal (face-attribute 'spiff-file-header-face :extend fr) nil))
+ (should (equal (face-attribute 'spiff-indicator-changed :extend fr) t))
(should (equal (face-attribute 'faces--test-face3 :extend nil t) t))
))
(disable-theme 'faces-test-light)
- (should (equal (face-attribute 'diff-indicator-changed :extend) t))
+ (should (equal (face-attribute 'spiff-indicator-changed :extend) t))
(should (equal (face-attribute 'faces--test-face3 :extend nil t) 'unspecified))
(or noninteractive
(let ((fr (make-frame)))
- (should (equal (face-attribute 'diff-changed-face :extend fr) t))
- (should (equal (face-attribute 'diff-added :extend fr) 'unspecified))
- (should (equal (face-attribute 'diff-file-header-face :extend fr) nil))
- (should (equal (face-attribute 'diff-indicator-changed :extend fr) t))
+ (should (equal (face-attribute 'spiff-changed-face :extend fr) t))
+ (should (equal (face-attribute 'spiff-added :extend fr) 'unspecified))
+ (should (equal (face-attribute 'spiff-file-header-face :extend fr) nil))
+ (should (equal (face-attribute 'spiff-indicator-changed :extend fr) t))
(should (equal (face-attribute 'faces--test-face3 :extend nil t) 'unspecified))
))
)