branch: externals/org-modern
commit 7792c823d2273546cf62f60dad637ed827c05a00
Merge: 550041f9fb a7b22acf5e
Author: JD Smith <93749+jdtsm...@users.noreply.github.com>
Commit: GitHub <nore...@github.com>
Merge pull request #4 from mclearc/main
Define face for org-modern-indent
---
org-modern-indent.el | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/org-modern-indent.el b/org-modern-indent.el
index ec25ffd1fa..cb36e8b765 100644
--- a/org-modern-indent.el
+++ b/org-modern-indent.el
@@ -35,6 +35,11 @@
(require 'org-indent)
(require 'seq)
+;; Add face for org-modern-indent line
+(defface org-modern-indent-line '((t (:inherit (org-meta-line) :weight light)))
+ "Face for line in org-modern-indent."
+ :group 'faces)
+
(defun org-modern-indent--face-in (faces element)
"Determine if any of FACES are present in ELEMENT.
FACES must be a list. A face can be 'present' by being named
@@ -133,11 +138,11 @@ To be set as :around advice for
`org-insert-structure-template'."
(if org-modern-indent-mode
(progn
(setq org-modern-indent-begin
- (propertize "╭" 'face 'org-meta-line)
+ (propertize "╭" 'face 'org-modern-indent-line)
org-modern-indent-guide
- (propertize "│" 'face 'org-meta-line)
+ (propertize "│" 'face 'org-modern-indent-line)
org-modern-indent-end
- (propertize "╰" 'face 'org-meta-line))
+ (propertize "╰" 'face 'org-modern-indent-line))
(setq-local org-fontify-quote-and-verse-blocks t)
(setf (symbol-function 'org-indent-set-line-properties)
(symbol-function 'org-modern-indent-set-line-properties))
