[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org-modern 91ad14f155: org-modern-mode: Flush the font
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org-modern 91ad14f155: org-modern-mode: Flush the font locking of the entire buffer (Fix #27) |
Date: |
Mon, 21 Mar 2022 11:57:45 -0400 (EDT) |
branch: externals/org-modern
commit 91ad14f155e09a4abdb481b2e6f33ff089ec35f4
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
org-modern-mode: Flush the font locking of the entire buffer (Fix #27)
---
org-modern.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/org-modern.el b/org-modern.el
index ad97072290..842a2e1ca4 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -507,10 +507,12 @@ You can specify a font `:family'. The font families
`Iosevka', `Hack' and
'((" \\[\\(\\([0-9]+\\)%\\|\\([0-9]+\\)/\\([0-9]+\\)\\)\\]" (0
(org-modern--statistics)))))))
(font-lock-add-keywords nil org-modern--keywords 'append)
(advice-add #'org-unfontify-region :after #'org-modern--unfontify))
- (t (font-lock-remove-keywords nil org-modern--keywords)
- (let ((org-modern-mode t))
- (org-modern--unfontify (point-min) (point-max)))))
- (font-lock-flush))
+ (t (font-lock-remove-keywords nil org-modern--keywords)))
+ (save-restriction
+ (widen)
+ (let ((org-modern-mode t))
+ (org-modern--unfontify (point-min) (point-max)))
+ (font-lock-flush)))
(defun org-modern--unfontify (beg end &optional _)
"Unfontify prettified elements between BEG and END."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/org-modern 91ad14f155: org-modern-mode: Flush the font locking of the entire buffer (Fix #27),
ELPA Syncer <=