diff --git a/lisp/org-clock.el b/lisp/org-clock.el index cb6a6c9ad..7c1c6c24e 100644 --- a/lisp/org-clock.el +++ b/lisp/org-clock.el @@ -2701,8 +2701,7 @@ LEVEL is an integer. Indent by two spaces per level above 1." (pcase-let ((`(,month ,day ,year) (calendar-gregorian-from-absolute ts))) (setq ts (float-time (encode-time 0 0 0 day month year))))) (ts - (setq ts (float-time - (apply #'encode-time (org-parse-time-string ts nil t)))))) + (setq ts (float-time (apply #'encode-time (org-parse-time-string ts)))))) (cond ((numberp te) ;; Likewise for te.