[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org d0a917ab23 1/2: org-agenda-get-progress: Fix detect
|
From: |
ELPA Syncer |
|
Subject: |
[elpa] externals/org d0a917ab23 1/2: org-agenda-get-progress: Fix detecting time when todo keyword contains ] |
|
Date: |
Wed, 10 Jan 2024 10:48:19 -0500 (EST) |
branch: externals/org
commit d0a917ab236f6c53b11a8c6526f898aa8a89f96c
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
org-agenda-get-progress: Fix detecting time when todo keyword contains ]
* lisp/org-agenda.el (org-agenda-get-progress): Improve accuracy
matching time inside state note.
The old code failed to match time in
- State "[X]" from "[ ]" [2022-10-25 Tue 10:00]
Link:
https://old.reddit.com/r/orgmode/comments/ycshlg/orgagendalogmode_does_not_display_time_for/
---
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 d8f516ef22..13f450c523 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -6124,7 +6124,7 @@ then those holidays will be skipped."
effort (save-match-data (or (get-text-property (point) 'effort)
(org-entry-get (point)
org-effort-property))))
(setq effort-minutes (when effort (save-match-data
(org-duration-to-minutes effort))))
- (when (string-match "\\]" timestr)
+ (when (string-match org-ts-regexp-inactive timestr)
;; substring should only run to end of time stamp
(setq rest (substring timestr (match-end 0))
timestr (substring timestr 0 (match-end 0)))