[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org-modern a5616ce742 2/4: Rename variable
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org-modern a5616ce742 2/4: Rename variable |
Date: |
Sat, 25 Jun 2022 02:57:45 -0400 (EDT) |
branch: externals/org-modern
commit a5616ce7426571eff54b8e4188c59414a5cad238
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Rename variable
---
org-modern.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/org-modern.el b/org-modern.el
index 1b6b1a5424..0442032ec8 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -294,7 +294,7 @@ You can specify a font `:family'. The font families
`Iosevka', `Hack' and
(t :strike-through "gray30"))
"Face used for horizontal ruler.")
-(defvar-local org-modern--keywords nil
+(defvar-local org-modern--font-lock-keywords nil
"List of font lock keywords.")
(defun org-modern--checkbox ()
@@ -527,7 +527,7 @@ You can specify a font `:family'. The font families
`Iosevka', `Hack' and
(vconcat (make-vector (- 127 h) #x80) [#xFF] (make-vector h 0)) nil
nil 'bottom)))
(org-modern--update-label-face)
(setq
- org-modern--keywords
+ org-modern--font-lock-keywords
(append
(when-let (bullet (alist-get ?+ org-modern-list))
`(("^[ \t]*\\(+\\)[ \t]" 1 '(face nil display ,bullet))))
@@ -617,9 +617,9 @@ You can specify a font `:family'. The font families
`Iosevka', `Hack' and
(when org-modern-statistics
'((" \\[\\(\\([0-9]+\\)%\\|\\([0-9]+\\)/\\([0-9]+\\)\\)\\]"
(0 (org-modern--statistics)))))))
- (font-lock-add-keywords nil org-modern--keywords 'append)
+ (font-lock-add-keywords nil org-modern--font-lock-keywords 'append)
(advice-add #'org-unfontify-region :after #'org-modern--unfontify))
- (t (font-lock-remove-keywords nil org-modern--keywords)))
+ (t (font-lock-remove-keywords nil org-modern--font-lock-keywords)))
(save-restriction
(widen)
(let ((org-modern-mode t))