branch: externals/org-modern
commit 6fc453d10bdaaa359fa209919e81c09990bce8fa
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>

    Recognize time stamps with duration (Fix #9)
---
 example.org   | 3 ++-
 org-modern.el | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/example.org b/example.org
index 410e5a9bbf..ba41e2c515 100644
--- a/example.org
+++ b/example.org
@@ -25,7 +25,8 @@ which are styled by =org-modern=.
 * Timestamps
 DEADLINE:  <2022-03-01 Tue>
 SCHEDULED: <2022-02-25 10:00>
-RANGE:     [2022-03-01]--[2022-04-01]
+DRANGE:    [2022-03-01]--[2022-04-01]
+TRANGE:    [2022-03-01 Tue 10:42-11:00]
 TIMESTAMP: [2022-02-21 Mon 13:00]
 REPEATED:  <2022-02-26 Sat .+1d>
 
diff --git a/org-modern.el b/org-modern.el
index 5eef0648c9..85812c033c 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -480,7 +480,7 @@ Set to nil to disable the indicator."
       (when org-modern-tag
         '(("^\\*+.*?\\( \\)\\(:.*:\\)[ \t]*$" (0 (org-modern--tag)))))
       (when org-modern-timestamp
-        '(("\\(?:<\\|\\[\\)\\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\}\\(?: 
[[:word:]]+\\)?\\)\\(\\(?: [0-9]\\{2\\}:[0-9]\\{2\\}\\)?\\(?: 
[.+-]+[0-9]+[hdwmy]\\)?\\)\\(?:>\\|\\]\\)"
+        '(("\\(?:<\\|\\[\\)\\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\}\\(?: 
[[:word:]]+\\)?\\)\\(\\(?: [0-9:-]+\\)?\\(?: 
[.+-]+[0-9]+[hdwmy]\\)?\\)\\(?:>\\|\\]\\)"
            (0 (org-modern--timestamp)))))
       (when org-modern-statistics
         '((" \\[\\(\\([0-9]+\\)%\\|\\([0-9]+\\)/\\([0-9]+\\)\\)\\]" (0 
(org-modern--statistics)))))))

Reply via email to