[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org-modern 2775d73156: Use org-list-full-item-re (Fix #
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org-modern 2775d73156: Use org-list-full-item-re (Fix #138) |
Date: |
Wed, 14 Jun 2023 15:58:44 -0400 (EDT) |
branch: externals/org-modern
commit 2775d731560c64e085d28446aefe5d0d8e4eb889
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Use org-list-full-item-re (Fix #138)
---
org-modern.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/org-modern.el b/org-modern.el
index 7dd25eefd4..8832603822 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -343,8 +343,8 @@ the font.")
(defun org-modern--checkbox ()
"Prettify checkboxes according to `org-modern-checkbox'."
- (let ((beg (match-beginning 1))
- (end (match-end 1)))
+ (let ((beg (match-beginning 3))
+ (end (match-end 3)))
(put-text-property
beg end 'display
(cdr (assq (char-after (1+ beg)) org-modern--checkbox-cache)))))
@@ -659,8 +659,8 @@ the font.")
`((,(format "^\\*+ +%s " (regexp-opt org-todo-keywords-1 t))
(0 (org-modern--todo)))))
(when org-modern-checkbox
- '(("^[ \t]*\\(?:[-+*]\\|[0-9]+[.)]\\)[ \t]+\\(\\[[ X-]\\]\\)[ \t]"
- (0 (org-modern--checkbox)))))
+ `((,org-list-full-item-re
+ (3 (org-modern--checkbox) nil t))))
(when (or org-modern-star org-modern-hide-stars)
`(("^\\(\\**\\)\\* "
(0 ,(if (eq org-modern-hide-stars t)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/org-modern 2775d73156: Use org-list-full-item-re (Fix #138),
ELPA Syncer <=