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

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

[elpa] externals-release/org 307e722: org-agenda.el: Fix clocking issues


From: ELPA Syncer
Subject: [elpa] externals-release/org 307e722: org-agenda.el: Fix clocking issues regex
Date: Sat, 15 May 2021 10:57:14 -0400 (EDT)

branch: externals-release/org
commit 307e722dd9947aefd3c1e03452f5913bf9d68bfe
Author: mosquito-magnet <24659697+mosquito-magnet@users.noreply.github.com>
Commit: Bastien <bzg@gnu.org>

    org-agenda.el: Fix clocking issues regex
    
    * org-agenda.el (org-agenda-show-clocking-issues): Fix regex
    to prevent false-positive clocking issue detection.
    
    Regex was missing a grouping to restrict the alternative \| to the
    literal parentheses.
    
    TINYCHANGE
---
 lisp/org-agenda.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index d057947..c99ee2a 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -5986,7 +5986,7 @@ See also the user option 
`org-agenda-clock-consistency-checks'."
                       '((:background "DarkRed") (:foreground "white"))))
         issue face m te ts dt ov)
     (goto-char (point-min))
-    (while (re-search-forward " Clocked: +(-\\|\\([0-9]+:[0-9]+\\))" nil t)
+    (while (re-search-forward " Clocked: +(\\(?:-\\|\\([0-9]+:[0-9]+\\)\\))" 
nil t)
       (setq issue nil face def-face)
       (catch 'next
        (setq m (org-get-at-bol 'org-marker)



reply via email to

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