[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org dd2212395b: org-ctrl-c-ctrl-c: Update timestamp at
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org dd2212395b: org-ctrl-c-ctrl-c: Update timestamp at point inside clock lines |
Date: |
Tue, 11 Oct 2022 03:57:56 -0400 (EDT) |
branch: externals/org
commit dd2212395b58f67f776485217da9d6e1d8bb1f8b
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>
org-ctrl-c-ctrl-c: Update timestamp at point inside clock lines
* lisp/org.el (org-ctrl-c-ctrl-c): Update the timestamp at point, if
any; not just the clock sum.
Reported-by: "Bruce E. Robertson" <brucer42@gmail.com>
Link: https://orgmode.org/list/87mtjo2twj.fsf@gmail.com
---
lisp/org.el | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/lisp/org.el b/lisp/org.el
index 080ef13983..17e8b663fa 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -17307,7 +17307,12 @@ This command does many different things, depending on
context:
((or `babel-call `inline-babel-call)
(let ((info (org-babel-lob-get-info context)))
(when info (org-babel-execute-src-block nil info nil type))))
- (`clock (org-clock-update-time-maybe))
+ (`clock
+ (if (org-at-timestamp-p 'lax)
+ ;; Update the timestamp as well. `org-timestamp-change'
+ ;; will call `org-clock-update-time-maybe'.
+ (org-timestamp-change 0 'day)
+ (org-clock-update-time-maybe)))
(`dynamic-block
(save-excursion
(goto-char (org-element-property :post-affiliated context))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/org dd2212395b: org-ctrl-c-ctrl-c: Update timestamp at point inside clock lines,
ELPA Syncer <=