emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org be0cdd1 40/85: org-mouse: Support intermediate-stat


From: ELPA Syncer
Subject: [elpa] externals/org be0cdd1 40/85: org-mouse: Support intermediate-state checkboxes
Date: Mon, 27 Sep 2021 15:57:46 -0400 (EDT)

branch: externals/org
commit be0cdd1e520a0c8bc2d70f38233b00cd3d09e8ba
Author: Jim Porter <itsjimporter@gmail.com>
Commit: Bastien <bzg@gnu.org>

    org-mouse: Support intermediate-state checkboxes
    
    * lisp/org-mouse.el (org-mode-hook): Use regexp from
    `org-set-font-lock-defaults' and set font-lock keywords more robustly.
    
    TINYCHANGE
---
 lisp/org-mouse.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/org-mouse.el b/lisp/org-mouse.el
index 4471d8e..eae6cd9 100644
--- a/lisp/org-mouse.el
+++ b/lisp/org-mouse.el
@@ -890,8 +890,8 @@ This means, between the beginning of line and the point."
             (when (memq 'activate-checkboxes org-mouse-features)
               (font-lock-add-keywords
                nil
-               `(("^[ \t]*\\([-+*]\\|[0-9]+[.)]\\) +\\(\\[[ X]\\]\\)"
-                  (2 `(face org-checkbox keymap ,org-mouse-map mouse-face 
highlight) t)))
+               `(("^[ \t]*\\(?:[-+*]\\|[0-9]+[.)]\\)[ 
\t]+\\(?:\\[@\\(?:start:\\)?[0-9]+\\][ \t]*\\)?\\(\\[[- X]\\]\\)"
+                  (1 `(face nil keymap ,org-mouse-map mouse-face highlight) 
prepend)))
                t))
 
             (defadvice org-open-at-point (around org-mouse-open-at-point 
activate)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]