From 375e39dd3543f46ee4127d5286f4851ccce0d8fb Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Sat, 13 Jan 2018 14:07:20 +0100 Subject: [PATCH] [Org] Simplification --- site-lisp/db-org.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/site-lisp/db-org.el b/site-lisp/db-org.el index 1e04003..41d3983 100644 --- a/site-lisp/db-org.el +++ b/site-lisp/db-org.el @@ -1150,10 +1150,9 @@ START and END must be given as org-mode timestamp strings." ;; Keep headline as they are, i.e., do nothing (lambda ()))) - ;; Finally add the new clock line - (org-with-point-at location - (db/org-add-clocking-time (apply #'encode-time (org-parse-time-string start)) - (apply #'encode-time (org-parse-time-string end)))))) + ;; Finally add the new clock line + (org-with-point-at location + (db/org-add-clocking-time new-start new-end))))) ;;; End