From 41a57ecd96cc860e9c92607df370e45c62edff98 Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Sun, 3 Dec 2017 09:27:36 +0100 Subject: [PATCH] [Org] Fix condition on when to include the current clock during reporting --- site-lisp/db-org.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/site-lisp/db-org.el b/site-lisp/db-org.el index f977bf2..a8efd4c 100644 --- a/site-lisp/db-org.el +++ b/site-lisp/db-org.el @@ -1020,10 +1020,10 @@ limits, but it is always true that TSTART ≤ END or START ≤ TEND." (when (and org-clock-report-include-clocking-task (eq (org-clocking-buffer) (current-buffer)) (eq (marker-position org-clock-hd-marker) (point)) - tstart - tend - (>= (float-time org-clock-start-time) tstart) - (<= (float-time org-clock-start-time) tend)) + (or (and tstart + (<= tstart (float-time org-clock-start-time))) + (and tend + (<= (float-time) tend)))) (push (cons (float-time org-clock-start-time) (float-time)) times)) (when (not (null times))