org-clock.el: Update org-clock-out-time from org-resolve-clocks

* lisp/org-clock.el (org-clock-out): If `at-time' was passed, set
org-clock-out-time to that value. Otherwise, set it to now.

TINYCHANGE
This commit is contained in:
Benson Chu 2020-08-09 17:57:51 -05:00 committed by Kyle Meyer
parent 47f26b1e76
commit bd97851c47
1 changed files with 1 additions and 1 deletions

View File

@ -1580,7 +1580,7 @@ to, overriding the existing value of `org-clock-out-switch-to-state'."
org-clock-out-switch-to-state))
(now (org-current-time org-clock-rounding-minutes))
ts te s h m remove)
(setq org-clock-out-time now)
(setq org-clock-out-time (or at-time now))
(save-excursion ; Do not replace this with `with-current-buffer'.
(with-no-warnings (set-buffer (org-clocking-buffer)))
(save-restriction