branch: externals/org-modern
commit 567b702ad0aedbab3451a9e064abb23d1bb275c2
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
Do not use :inherit when merging with custom faces
---
org-modern.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/org-modern.el b/org-modern.el
index dbd3d7db6f..242ebcab62 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -416,7 +416,7 @@ the font.")
beg end 'face
(if-let ((face (or (cdr (assq prio org-modern-priority-faces))
(cdr (assq t org-modern-priority-faces)))))
- `(:inherit (,face org-modern-label))
+ `(,face org-modern-label)
'org-modern-priority)))))
(defun org-modern--progress ()
@@ -468,7 +468,7 @@ the font.")
(if-let ((faces org-modern-tag-faces)
(face (or (cdr (assoc (buffer-substring-no-properties
colon-end cbeg) faces))
(cdr (assq t faces)))))
- `(:inherit (,face org-modern-tag))
+ `(,face org-modern-tag)
'org-modern-tag)))
(add-text-properties cbeg cend colon-props)
(setq colon-beg cbeg colon-end cend))))))
@@ -485,7 +485,7 @@ the font.")
beg end 'face
(if-let ((face (or (cdr (assoc todo org-modern-todo-faces))
(cdr (assq t org-modern-todo-faces)))))
- `(:inherit (,face org-modern-label))
+ `(,face org-modern-label)
(if (string-match-p org-not-done-regexp todo)
'org-modern-todo 'org-modern-done)))))